музыкальный диск стоит x рублей n копеек. у вас а рублей. хватит ли денег на покупку диска? запись должна быть в виде разветвляющегося алгоритма.

Question

Информатика

Старемилиан

27 января, 16:02

музыкальный диск стоит x рублей n копеек. у вас а рублей. хватит ли денег на покупку диска? запись должна быть в виде разветвляющегося алгоритма.

+1

Ответы (1)

Знаете ответ на вопрос?

Федяка · Answer 1

Program pr;

uses crt;

Var x, a:real;

Begin

Writeln ('стоимость диска') ;

readln (x) ;

Writeln ('сколько у вас руб.') ;

readln (a) ;

if a>=x then Writeln ('хватит')

else Writeln ('не хватит') ;

readln;

end.