С цикла for вычислите значение выражения 3*4 + 4*5 +... + 50*51
язык паскаль
119
123
Ответы на вопрос:
program z1;
var i,s:integer;
begin
s:=0;
for i:=3 to 50 do s:=s+i*(i+1);
writeln (s)
end.
3*4 + 4*5 + ... + 50*51 = 44 192
Объяснение:
Перебираем числа от 3 до 50 и вычисляем сумму
Program massiv; var a: array [1..3] of integer; i: integer; begin writeln('напишите 3 числа через пробел'); for i : = 1 to 3 doread(a[i]); for i : = 1 to 3 dowriteln(a[i]); readln; end.
Популярно: Информатика
-
gc1215.05.2021 07:55
-
PROMES01.06.2022 18:13
-
vladislav423919.06.2021 15:54
-
zkudaybergen23.02.2021 09:20
-
SASHA2310310.02.2021 13:50
-
nikolayAK22.12.2021 21:25
-
Eugenrar04.05.2022 12:10
-
rkarina7914.02.2021 06:48
-
Guppy201609.02.2021 07:23
-
спартак37118.05.2023 18:48