Ввести три числа четные числа возвести в квадрат не четные оставить без изменений!!! помогите плиз
!!! помогите плиз
Ответы:
23-08-2018 04:58
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.
Также наши пользователи интересуются:
В начале учебного года в школе было 950 учащихся, а к концу учебного года их стало 893.1-2х/3-х+3/4=2-4х/5 помогите решить пожалуйста
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Ввести три числа четные числа возвести в квадрат не четные оставить без изменений» от пользователя ЕВГЕНИЯ ГАВРИЛЕНКО в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!