Doriris
4 год назад
Напишите программу на языке Паскаль
ОТВЕТЫ
Людмила
Oct 24, 2020
var x, y:real;
begin
readln(x);
readln(y);
if (y<=2) and (y>=0) and (x>=-3) and (x<=5) then writeln ('yes') else writeln ('no');
end.
begin
readln(x);
readln(y);
if (y<=2) and (y>=0) and (x>=-3) and (x<=5) then writeln ('yes') else writeln ('no');
end.
941
Смежные вопросы: