Question

ДАЮ 60 БАЛЛОВ!!!!! ПОМОГИТЕ, ПОЖАЛУЙСТА, СЕГОДНЯ ВЫСТАВЛЯЮТ ОЦЕНКИ ЗА ЧЕТВЕРТЬ.МНЕ НУЖНО СЕГОДНЯ!!!!!!!!!!!!!!!!Написать программу на Паскале,используя цикл с постусловием (Repeat-until) для решения задачи. Вычислить сумму всех двухзначных чисел. S=10+2+3+...+99.
И ЕЩЕ: Написать программу на Паскале используя цикл с параметром: 1) вычислите произведение первых 10 натуральных чисел 2) вывести на экран степени тройки от 0 степени до 5 например
0 0
1 3
2 9 и т.д.

Answer 1

Ответ:

var

i:byte;

summ:longint;

begin

summ:=1;

for i:=10 to 99 do

summ:=summ+i;

writeln('Cymma=',summ);

end.

Объяснение: