ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ ПО ИНФОРМАТИКЕ!Даю 25 балловСоставить программку,которая определяет

ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ ПО ИНФОРМАТИКЕ!Даю 25 баллов

Составить программу,которая определяет сколько слагаемых обязано быть в сумме последовательности 2+4+6+8+.. и эта сумма оказалась больше данного числа n. Ngt;=0

Паскаль,8 класс!

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

var

 i, c, s, n:integer;

Begin

 write('Введите n: ');

 readln(n);

 s:= 0;

 c:= 0;

 write('Последовательность: ');

 while i lt; n do begin

   s:= s + i;

   c:= c + 1;

   i:= i + 2;

   write(i, ' ');

 end;

 writeln;

 writeln('Сумма последовательности: ', s);

 writeln('Количество слагаемых: ', c);

END.

Альбина Голопузова
Спасибо большое!!!!\
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт