Регистрация
Войти
Стать экспертом Правила
Информатика

среди всех трехзначных чисел все перевертыши(ПОСЛЕДНЯЯ И НАЧАЛЬНАЯ ЦИФРЫ СОВПАДАЮТ) Через for to do написать программу на языке паскаль

ОТВЕТЫ
var i:integer;
begin
for i:=100 to 999 do
 if (i div 100)=(i mod 10) then writeln(i);
end.

Результат:
101
111
121
131
...
979
989
999
31
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам