Даны два действительных числа. Составьте программу, которая заменяет число нулем, если оно меньше второго, или оставляет без изменения в противном случае.

Question

Информатика

Агна

17 сентября, 05:48

Даны два действительных числа. Составьте программу, которая заменяет число нулем, если оно меньше второго, или оставляет без изменения в противном случае.

+1

Ответы (2)

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

Арсен · Answer 1

Var

a, b : real;

begin

read (a, b) ;

if (a < b) then a : = 0;

write (a, ' ', b) ;

end.

Матвей · Answer 2

Var a, b:real;

begin

writeln ('Введи два вещественных числа') ;

readln (a, b) ;

if a
else if b
writeln (a:5:2,' ', b:5:2) ;

readln;

end.

Если я правильно поняла.