Ввести ри числа a,b,c. напечатать все отрицательные числа в программе Паскаль
Ввести ри числа a,b,c. напечатать все отрицательные числа
в программе Паскаль
Ответ(ы) на вопрос:
Гость
Var a,b,c: integer;
begin
writeln('Введите числа');
readln(a,b,c);
if a<0 then writeln(a,' отрицательное');
if b<0 then writeln(b,' отрицательное');
if c<0 then writeln(c,' отрицательное');
end.
Не нашли ответ?
Похожие вопросы