Пожалуста составьте программу которая находит сумму 2 чисел на Паскале. И чтобы программа...
Пожалуста составьте программу которая находит сумму 2 чисел на Паскале. И чтобы программа повторялась каждый раз без перезапуска (цикл)

11 Июл 2019 в 06:07
204 +1
0
Ответы
1

Программа находит сумму двух чисел и продолжает работать до тех пор, пока пользователь не введет команду для выхода из программы.

program SumOfTwoNumbers;
var
num1, num2, sum: integer;
exitProgram: boolean;
userInput: string;
begin
exitProgram := false;
repeat
writeln('Введите два числа для сложения:');
readln(num1);
readln(num2);
sum := num1 + num2;
writeln('Сумма двух чисел: ', sum);
writeln('Хотите продолжить работу? (Y/N)');
readln(userInput);
if (userInput = 'N') or (userInput = 'n') then
exitProgram := true;
until exitProgram;
end.

Для запуска программы вам нужно скопировать код в среду программирования Pascal и запустить программу. После каждого расчета суммы двух чисел программа будет запрашивать ваше согласие на продолжение или завершение работы.

20 Апр в 23:26
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Название заказа не должно быть пустым
Введите email
Бесплатные доработки
Гарантированные бесплатные доработки
Быстрое выполнение
Быстрое выполнение от 2 часов
Проверка работы
Проверка работы на плагиат
Интересные статьи из справочника
Поможем написать учебную работу
Название заказа не должно быть пустым
Введите email
Доверьте свою работу экспертам
Разместите заказ
Наша система отправит ваш заказ на оценку 83 887 авторам
Первые отклики появятся уже в течение 10 минут
Прямой эфир