Предмет:
ИнформатикаАвтор:
анонимvar n, i : integer; // объявляем переменныеbegin write(\'Введите число: \'); // выводим строку на экран readln(n); // считываем значение, введенное с клавиатуры for i := 10 to 99 do // перебираем все двузначные числа begin if (i mod n = 0) then writeln (i); // если число i без остатка делится на n выводим его на экран end end.
Автор:
lizzyДобавить свой ответ
Предмет:
ИнформатикаАвтор:
анонимОтветов:
Смотреть
Предмет:
ИнформатикаАвтор:
анонимОтветов:
Смотреть
Предмет:
ИнформатикаАвтор:
анонимОтветов:
Смотреть
Предмет:
ИнформатикаАвтор:
анонимОтветов:
Смотреть