Как это написать на паскале программу вычисления суммы

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

Задать свой вопрос
1 ответ

Ответ:

К примеру, так:

Изъясненье:

program sum100;

var s,a:integer;

begin

s:=0;

a:=1;

repeat

s:=s+100-a;

write(a,' ');

a:=a+4;

until agt;49;

writeln('s= ',s);

readln;

end.

Мишаня Гризодубов
ty
Бруев Иван
??
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт