1)Дано число n . вывести 2 в ступени 52)Отыскать сумму натуральных

program zz1;

var a,  n, i, s:integer; // задаем переменные целого типа

begin

write( введите n ); // вводим данное n с клавиатуры

read(n);

a:= 2 * 2 * 2 * 2 * 2;  // вычисляем два в пятой степени

writeln(два в пятой ступени одинакова = , a); // выводим 1-ый ответ

for i:=35 to 132 do  // перебираем все числа от 30 5 до 100 тридцати 2-ух

s:=s + i; // находим сумму естественных чисел ряда

writeln( сумма натуральных чисел от 35 до 132 = , s); // выводим 2-ой ответ

end.