Составьте программку которая выводит на экран все двухзначные числа сумма цифр

Составьте программу которая выводит на экран все двухзначные числа сумма цифр которых одинакова 7

Задать свой вопрос
1 ответ
Program n_1;
var i,a:integer;
  begin
    
    for i := 10 to 99 do  begin
      a := i mod 10 + i div 10;
        if a = 7 then
          writeln(i);
    end
  end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт