Question

Цикл с параметром в паскале. Найти все двузначные числа, в записи которых есть цифра 5

Answer 1

program proga;
var i:integer;
begin
for i:=10 to 99 do begin 
if ((i mod 10 = 5) or(i div 10 = 5)) then 
write(i);
end;
end.