Регистрация
seryakovart
02.03.2021 23:47
Информатика
Есть ответ 👍

Ввести 3 числа чётные возвести в квадрат, а не чётные оставить без изменений

281
463
Посмотреть ответы 2

Ответы на вопрос:

kseniaLi555
kseniaLi555
4,6(84 оценок)
Var a,b,c: integer; begin  read(a,b,c); if a mod 2=0 thena: =a*a; if b mod 2=0 thenb: =b*b; if c   mod 2=0 thenc: =c*c; writeln(a,' ',b,' ',c)end.
Fidashka5616
Fidashka5616
4,4(32 оценок)

Объяснение:

Html youtube қарайсың

Популярно: Информатика