Предмет: Информатика, автор: 11041993

обчислення суми чисел які діляться на 3

Ответы

Автор ответа: sinbad7
0

var

s,n,i:integer;

begin

write('Введите количество чисел');

readln(n);

s:=0;

for i:=1 to n do

s:=s+i*3;

writeln(s);

end.

Интересные вопросы