Регистрация
Войти
Стать экспертом Правила
Информатика

Проходим цикл с предусловием. Нужно составить в Pascal 2 программы.1) Дано натуральное число n. Написать программу для вычисления суммы членов последовательности 10,15,20...n2) Вывести степени двойки от 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.


ПаскальАБС.Нет - версия Паскаля, нужен фраемфорк .нет в Паскале, если не работает - обнови паскаль
657
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам