Предмет: Информатика, автор: Adadadaf

1 задание помогите ​

Приложения:

Ответы

Автор ответа: Omikami
0

Ответ:

var

 i, sum:integer;

begin

 sum := 0;

 for i := 1 to 100 do

   sum := sum + i;

 write(sum);

end.

Похожие вопросы
Предмет: Русский язык, автор: AlenaShooc
Предмет: История, автор: Erke308854
Предмет: Алгебра, автор: Stena1661