Программа ** Pascal. Создать Программу расчета стоимости бензина ** АЗС ( данные...

0 голосов
72 просмотров

Программа на Pascal. Создать Программу расчета стоимости бензина на АЗС ( данные придумать)


Информатика (39 баллов) | 72 просмотров
Дан 1 ответ
0 голосов

Program AZS;
uses crt;
var price, amount, p_a: real;
begin
clrscr;
write('BBeDuTe cTouMocTb bEH3uHa 3a 1 JluTp: ');
readln(price);
write('CKoJlbKo JluTpoB lloKyllaeTe? ');
readln(amount);
write('K ollJlaTe ', price*amount, ' pybJleu')
end.

Переменные типа real. Если программа крашнулась во время компиляции, значит вы ввели неправильно нецелое число (например, 78.7, а не 78,7). Желательно вводить числа через Numpad.

(18 баллов)