Программу, которая вычисляет сумму всех чётных чисел в диапазоне от 1 до n. в pascale с оператором цикла
106
355
Ответы на вопрос:
program aaa;
var a, b ,x : real;
begin
readln(a,b,x);
if x > a then
if x< b then
writeln('прин')
else
writeln('не прин')
else
writeln('не прин')
end.
Популярно: Информатика
-
Mint23115.04.2021 10:41
-
самира22305.09.2022 20:22
-
sveta2015w13.10.2020 01:47
-
bolshakovatanyoxd2gr21.05.2021 02:56
-
lionelmessi00011.09.2020 18:40
-
Denis57724.01.2021 22:12
-
Vindrosel25.12.2020 22:36
-
Dinobot77407.04.2022 23:30
-
abbasbayaliev22.03.2022 20:36
-
cerenkovvladimi06.09.2021 20:52