Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.
Новые вопросы по предмету Информатика:
var
i,e,d,n: integer;
begin
for i:=10 to 99 do
begin
e:=i mod 10;
d:=i div 10;
n:=e+d;
if n mod 2=0 then writeln (i);
end;
end.