Предмет: Информатика,
автор: Yologame
Решение задачи на использование вложенных циклов
Буду рад, если увижу решение данной задачи.
Приложения:

Ответы
Автор ответа:
0
var i,j,n,sum,a:integer;begin readln(n); for i:=1 to n do begin a:=1; for j:=1 to i do a:=a*i; sum:=sum+a; end; writeln(sum);end.
Автор ответа:
0
Как же бесит, что в ответе код всегда вставляется криво, а в комментариях нормально
Автор ответа:
0
var
i,j,n,sum,a:integer;
begin
readln(n);
for i:=1 to n do
begin
a:=1;
for j:=1 to i do
a:=a*i;
sum:=sum+a;
end;
writeln(sum);
end.
i,j,n,sum,a:integer;
begin
readln(n);
for i:=1 to n do
begin
a:=1;
for j:=1 to i do
a:=a*i;
sum:=sum+a;
end;
writeln(sum);
end.
Автор ответа:
0
Сейчас проверим, но с виду, мне кажется, Вы правильно составили ). Ловите благодарность.
Похожие вопросы
Предмет: Русский язык,
автор: jddodkd
Предмет: Математика,
автор: aleksandrgordienko23
Предмет: Русский язык,
автор: vikalutsanova2009
Предмет: Математика,
автор: WARFAEC