Задать вопрос
6 мая, 11:16

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

+1
Ответы (1)
  1. 6 мая, 11:25
    0
    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.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «водится положительное число прекратить ввод когда сумма введёных чисел превысит 100 ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Напишите программу, в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введён ноль) и определение максимального (наибольшего) из введёных чисел. Используйте оператор repeat. Решить в паскале.
Ответы (1)
Как это решать? И что тут вообще надо сделать? A+B Ограничение времени 1 секунда Ограничение памяти 64Mb Ввод стандартный ввод или input. txt Вывод стандартный вывод или output. txt Даны 2 числа a и b. Найти сумму этих чисел.
Ответы (1)
Задача 1 - Дано целое число. Если оно положительное, вывести " Число положительное ", если отрицательное вывести "Число отрицательное ", если равно 0 - "Число равно нулю" задача 2 - дано целое число.
Ответы (1)
Даны три числа. Выведите медиану этого набора - второе по величине число. На вход подаются 3 числа. Ввод Вывод 1 2 3 2 Пример 2 Ввод Вывод 1 3 2 2 Пример 3 Ввод Вывод 2 1 3 2
Ответы (1)
Пример работы программы: Ввод: 5 5 5 Вывод: 0 0 0 Ввод: 5 8 5 Вывод: 8 8 8 Ввод: 5 6 7 Вывод: 5 6 7
Ответы (1)