Проходим цикл с предусловием. Нужно составить в 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.

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