Вопрос по информатике:
ОЧЕНЬ ПРИ ОЧЕНЬ СРОЧНО!!!!! СПАСИБО!!!
Составить программу для введения и суммирования чисел, пока сумма не станет больше 1000.
Пожаловаться
- 26.04.2018 22:24
- Информатика
- remove_red_eye 5577
- thumb_up 50
Ответы и объяснения 1
Var sum, number : integer;begin sum := 0; repeat write('Введите число: '); readln(number); sum := sum + number; until (sum > 1000); writeln('Сумма чисел: '+sum);end.
Пожаловаться
- 27.04.2018 12:37
- thumb_up 22
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы