Сpascal abc. вычислить значения переменных по заданным расчетным формулам. вывести на экран значения исходных данных и результатов, сопровождая вывод именами переменных x=3.741 y=15.4 z=0.252
232
363
Ответы на вопрос:
Var i,k,s: integer; begin k: =0; s: =0; i: =7; writeln('числа на интервале [7; 100], кратные 7: '); while i< =100 do begin write(i,' '); s: =s+i; inc(k); i: =i+7 end; writeln; writeln('сумма этих чисел равна ',s,', количество равно ',k); end. результат выполнения программы числа на интервале [7; 100], кратные 7: 7 14 21 28 35 42 49 56 63 70 77 84 91 98 сумма этих чисел равна 735, количество равно 14
Популярно: Информатика
-
rulmich1203p0dlzb23.08.2020 02:07
-
leogorec0621.06.2021 23:30
-
LOTOTSKAA05.08.2022 02:26
-
андрюха8715.05.2022 08:34
-
Lera680703.06.2020 13:45
-
ramzes2k0219.02.2022 20:22
-
Руслана46204.04.2022 06:34
-
каринп406.11.2021 00:05
-
Аня2003120419.09.2020 22:00
-
serzh142501.05.2022 19:15