Наити все трехзначные числа ,которые оканчиваются цифрои 3
Var i:integer;
begin
for i:=100 to 999 do
if (i mod 10=3) then write(i, );
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var i:integer;
begin
for i:=100 to 999 do
if (i mod 10=3) then write(i, );
end.