Две задачки в паскале1) Подсчитать сумму вводимых с клавиатуры чисел до

Две задачки в паскале
1) Подсчитать сумму вводимых с клавиатуры чисел до числа большего 11.
2) подсчитать сумму вводимых с клавиатуры чисел до числа не одинакового 7.

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

var k,a:integer;

begin

read(k);

while(klt;=11)do begin

a:=a+k;

read(k);

end;

write(a);

end.

//2 задачка

var k,a:integer;

begin

read(k);

while(klt;gt;7)do begin

a:=a+k;

read(k);

end;

write(a);

end.

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт