1. Информатика
  2. Водится положительное число

Водится положительное число прекратить ввод когда сумма введёных чисел превысит 100

koskol84p08pdw koskol84p08pdw    2   21.05.2019 17:00    0

Ответы
ЕкатеринаВеликая28 ЕкатеринаВеликая28  16.06.2020 12:03

uses crt;
var ch,s:integer;
begin
s:=0;
while s < 101 do
begin
readln(ch);
if ch > 0 then
s:=s+ch;

end;
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
chcuvivhcyxu chcuvivhcyxu  01.03.2021 17:52
Написать программу на python: Пользователь вводит целое число. Выведите его строку-описание вида отрицательное четное число , нулевое число , положительное нечетное...
Balanshiki Balanshiki  01.12.2020 18:26
решить задания по информатике...
жанель67 жанель67  12.03.2019 09:13
Используя команды прибавить 2 умножить на 3 определить сколько есть разных программ с которых можно из числа 8 получить число 18...
diana5974767 diana5974767  12.03.2019 09:07
1. найти значение переменных после выполнения алгоритма (расписать) 2. найти среднее арифметическое двух чисел 3. f=(a^(b& c)) 4. а v (в ^ с)=(а v в) ^(а v с)...
dongrigoriew20 dongrigoriew20  17.04.2020 11:32
За к поисковому серверу закодированы буквами Л, Б, В, Г. Расположите обозначения за в порядке возрастания количества страниц, которые найдёт поисковый сервер по каждому...
Nastya6376 Nastya6376  17.04.2020 11:32
1. Для кодирования одного пикселя используется 2 байта. Фотографию размером 1024´1024 пикселей сохранили в виде несжатого файла. Определите размер получившегося файла...
3Человек3 3Человек3  17.04.2020 11:31
HTML-страница, с которой начинается работа браузера при его включении, — это: Выберите один ответ: a. доменное имя b. URL c. домашняя страница d.IP-адрес...
ЧернаяРадуга ЧернаяРадуга  17.04.2020 11:31
Цель людей, создающих компьютерные вирусы. МНОГО И ОЧЕНЬ СЛОВ ДОЛЖНО БЫТЬ ТОЧНО....
Dfh32 Dfh32  27.08.2019 09:30
По каналу связи сообщения, содержащие только 5 букв: ш, к, о, л; а для передачи используется двоичный код, допускающий однозначное декодирование. для букв ш, к, о,...
skvorcova19991993 skvorcova19991993  27.08.2019 09:30
Задан массив x[1..n]. что нужно поставить вместо многоточия, чтобы в результате элементы в массиве x были переставлены в обратном порядке? for k: =1 to do begin c:...

Популярные вопросы