Var a,b,c:integer;beginreadln(a);readln(b);readln(c);if (a<0) or (b<0) or (c<0) then writeln('Отрицательные есть!') elsewriteln('Отрицательных нету!');end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
