Как сделать чтобы word показывал в каком квартале самая min и max прибыль?

program primer;

Var m,n,x:integer;

begin

 writeln('Введите стоимость диска');

 readln(m);

 writeln('Введите количество имеющихся денег');

 readln(n);

 

 if m>n then

   write('У вас недостаточно денег для покупки')

 else if n>=m then begin

   x := n-m;

   writeln('Ваша сдача ',x);

 end

 else

   write('Ошибка');

end.

Объяснение:

Для начала определяем 3 переменных: для стоимости диска, имеющихся у нас денег и сдачи. Если стоимость диска больше чем у нас денег, то выводится сообщение о недостатке денег для покупки, если же денег хватает или ровно столько, сколько нужно, то выводим сдачу. Всё что иначе - ошибка

Во Какая строка из перечисленных описывает целую переменную на языке Pascal?

а. var x: integer;

б. var x: boolean;

в. var x: real;

г. var x: char.

_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _

ВведениеЦелый тип данных в Pascal

В Pascal есть 5 целых типов:

shortintintegerlongintbyteword

_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _

Ищем верный ответ

Разберём каждый из вариантов ответа:

а. var x: integer;

Так как тип integer относится к целому типу данных, то данная строка описывает целую переменную.

б. var x: boolean;

Тип boolean относится к логическому типу данных, а значит данная строка описывает логическую переменную.

в. var x: real;

Тип real относится к вещественному типу данных, а значит не может описывать целую переменную.

г. var x: char.

Тип char используется для хранения одного символа, а не целого числа.

Конечный ответ:ответ: а) var x: integer.