Напишите программу по блок схеме

Напишите программу по блок схеме
Гость
Ответ(ы) на вопрос:
Гость
var a,n,i,s:integer; begin write('n = '); readln(n); i:=1; s:=0; repeat  write('a = ');  readln(a);  s:=s+a;  i:=i+1; until i>n; writeln('s = ',s); end. Пример: n = 5 a = 12 a = 32 a = 14 a = 10 a = 67 s = 135
Не нашли ответ?
Ответить на вопрос
Похожие вопросы