Как это написать на паскале программу вычисления суммы чисел (100-1)+(100-5)+(100-9)++(100-49)

дэн165 дэн165    1   25.04.2019 11:32    0

Ответы
ladusik69 ladusik69  08.06.2020 20:59

Например, так:

Объяснение:

program sum100;

var s,a:integer;

begin

s:=0;

a:=1;

repeat

s:=s+100-a;

write(a,' ');

a:=a+4;

until a>49;

writeln('s= ',s);

readln;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика