Пожалуйста помогите! Очень срочно…

Пожалуйста помогите! Очень срочно, нужно написать программу скорей всего мне кажется впаскале 1. Writel (' вести стоимость перчатки наприм') read (x) 2 стоимость сумки- наприм.3. Стоимость ремня- наприм.4. Если общая сумма больше 800 р, то вывести сумму с учетом 10% скидки 5. Если сумма меньше 800 р, то вывести суммуПомогите пожалуйста очень нужно, благодарю!

в избранное

fickusss

03 августа 2022

program test; var x: integer; var y: integer; var z: integer; var sum: real; begin readln (x); readln (y); readln (z); sum: =x+y+z; if sum>=800 then sum: =sum -sum/10; writeln (Trunc (sum); end.

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

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

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

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

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

Люди подскажите пожалуйста!

Объясните, что надо сделать. Я вставила диск в компьютер (мультик)

Помогите пожалуйста с решением и с объяснением: Квадрат заданного трехзначного числа равен кубу суммы цифр этогочисла

Дано трехзначное число. Определить, что оно четно

Вася, Илья, Коля, Никита и Петя решали задачи по информатике. Всего было 5 задач

Вычислите значение переменной Y после выполнения фрагмента программы int r=35%10, y; if (r=0) y=r*10; if

Дано действительное число P- периметр равностороннего треугольника

Программа сортировки по возрастанию значений в трех переменных: а, в, с. Помогитепожалуйста

27400

Алгебра

14822

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

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

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

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