Написать программу.с клавиатуры вводится число, если оно четное в: =а^2, если нечётное в: a^3
104
406
Ответы на вопрос:
Readln ( a ); if a mod 2 = 0 then write ( a*a ) else write ( a*a*a); end. в вар укажи; что число integer
Program enot; var a,b,i: integer; c: real; begin read(a,b); i: =a*a+b*b; c: = sqrt(i); writeln(c); end.
Популярно: Информатика
-
tsisarmaria12.05.2023 06:30
-
AbdurrahmanSam01.11.2021 03:46
-
анна225022.06.2021 03:27
-
maryyyyy201.04.2023 14:25
-
784685454225.03.2020 08:28
-
Каракоз1111119.04.2020 18:14
-
sad130013.08.2020 19:34
-
aeraerororrrrea22.01.2020 15:15
-
pastoling19.12.2022 06:37
-
Salta2124242408.10.2022 00:54