даны 2 вещественных числа. Напишите программу которая уменьшает первое число в 5 раз если она больше второго

Question

Информатика

Сергиян

31 января, 01:50

даны 2 вещественных числа. Напишите программу которая уменьшает первое число в 5 раз если она больше второго

+5

Ответы (1)

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

Пульхерия · Answer 1

Program z1;

var a, b:integer;

begin

writeln ('ведите числа-э) ;

readln (a, b) ;

if a>b then

begin

a:=a-1;

end;

writeln ('a=', a) ;

end. усё ...