!!!Напишите в PASCAL программу:
Даны три числа. Вывести на экран только отрицательные
Даны три числа. Вывести на экран только отрицательные
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
begin
writeln('Введите a,b,c'); readln(a,b,c);
if a<0 then writeln(a);
if b<0 then writeln(b);
if c<0 then writeln(c);
if (a>=0) and (b>=0) and (c>=0) then writeln('Отрицательных нет');
end.
begin
writeln('Введите три числа');
readln(a,b,c);
if a<0 then write(a , ' ');
if b<0 then write(b, ' ');
if c<0 then write (c);
end.