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

Question

Информатика

Михайло

10 июля, 03:11

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

+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.

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