Проходим цикл с предусловием. Нужно составить в Pascal 2 программы.
1) Дано натуральное число n. Написать программу для вычисления суммы членов последовательности 10,15,20…n
2) Вывести степени двойки от 1 до n.

Вопрос школьника по предмету Информатика

Проходим цикл с предусловием. Нужно составить в Pascal 2 программы.
1) Дано натуральное число n. Написать программу для вычисления суммы членов последовательности 10,15,20…n
2) Вывести степени двойки от 1 до n.

Ответ учителя по предмету Информатика

1)

var a,n,sum:integer;

begin

read(n);

a:=10;

sum:=0;

while(a <> n)

begin

sum := sum + a;

a := a+5;

end;

end.

2)

var n:integer;

begin

read(n);

for var i := 1 to n do writeln(power(2,i));

end.

ПаскальАБС.Нет — версия Паскаля, нужен фраемфорк .нет в Паскале, если не работает — обнови паскаль