Составить программу которая увеличивает значение выражения

Составить программу которая увеличивает значение выражения (a-b)*15 Если результат больше 100, то вывести соответствущее сообщение Если результат меньшеили равен, то вывести только число Помогите пожалуйста решить

в избранное

vital77

19 августа 2022

var a, b: real; begin write ('a='); readln (a); write ('b='); readln (b); if (a — b)*15 > 100 then writeln ('Результат больше 100') else writeln (' (', a, ' — ', b, ')*15=', (a — b)*15); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

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

ПОМОГИТЕ! В некоторой стране автомобильный номер длиной 7 символов составляют из заглавных букв

Дано натуральное число N. Найти сумму цифр этого числа. (Qbasik)

ПОМОГИТЕ ХОТЬ ЧТО МОЖИТЕ ОЧЕНЬ ПРОШУ 1. У исполнителя Калькулятор две команды, которым присвоены номера:…

Даны 3 числа. Найти среднее арифметическое квадратов этих чисел

Помогите пожалуйста! Найдите x: 1) 8 в степени x битов=32 Кбайт 2) 16 в степени x битов=128Кбайт

Программа, которая создает в отдельном случайный массив

DВ алфавите 4 буквы. Каждое слово состоит из 3 букв. Какое максимальное число словвозможно?

1) из каких этапов состоит работа программиста по решению задачи на компьютере?

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: