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

Question

Информатика

Вишута

4 марта, 21:48

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

+2

Ответы (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.

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