Ответы
Ответ дал:
0
Var i:integer;
begin
for i:=100 to 999 do
if ((i mod 100 div 10)mod 2=0) and ((i mod 100 div 10)<>0)
then writeln (i);
end.
Ответ дал:
0
Тут проверяется является ли вторая цифра в трех знчном числе четной
Ответ дал:
0
Спасибо
Ответ дал:
0
А можно чтобы они когда выписывались еще и сложились
Ответ дал:
0
В вашем новом вопросе я это сделал
Ответ дал:
0
ок
Вас заинтересует
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад