Напишите программу, которая запрашивает пять натуральных чисел и выводит 1, если это число нечётное и 0 -- если число чётное.
269
485
Ответы на вопрос:
Var a,i : integer; begin i: =0; repeat i: =i+1 read(a); if a mod 2 =1 then write(1) else write(0); until (i< 5); end.
Const pi=3.141592653589793238462643383279; var r,h: double; begin write('радиус '); readln(r); write('высота '); readln(h); writeln(pi*r*r*h); end.
Популярно: Информатика
-
katerinaderiiu18.05.2023 17:11
-
Лола66648411.07.2021 12:40
-
muravyov191021.09.2021 23:45
-
leraleva19.10.2022 09:06
-
Асем121118.03.2023 13:51
-
curlyprettygirl26.04.2023 12:39
-
tunekoff22826.02.2022 11:52
-
Мигает33307.03.2023 01:26
-
ДмитрийКалашник12.06.2022 23:33
-
Bohdanka99928.06.2020 02:07