Предмет: Информатика,
автор: наташа1234567890123
музыкальный диск стоит x рублей n копеек. у вас а рублей. хватит ли денег на покупку диска? запись должна быть в виде разветвляющегося алгоритма.
Ответы
Автор ответа:
0
Program pr;
uses crt;
Var x,a:real;
Begin
Writeln('стоимость диска');
readln(x);
Writeln('сколько у вас руб.');
readln(a);
if a>=x then Writeln('хватит')
else Writeln('не хватит');
readln;
end.
Похожие вопросы
Предмет: Английский язык,
автор: egorerin72
Предмет: Математика,
автор: Аноним
Предмет: История,
автор: mansur1703
Предмет: Физика,
автор: 555Девчоночка555