Ответы на вопрос:
Program asd; uses crt; var a,b,s: real; begin repeat writeln('введите отр. число, пока не будет введено, буду долбать! я жду! '); readln(a); until a< 0; if a< 0 then writeln('так бы сразу, молодец : ) '); end. вот так : )
Популярно: Информатика
-
nastafil3015.08.2021 14:21
-
Vitalyfifa07.05.2020 08:46
-
44444kobzarr121.03.2020 11:08
-
Seleno4ka13630.08.2021 23:19
-
Катя3621115.01.2022 23:33
-
мажорчик216.06.2023 20:51
-
soonmin16.04.2022 00:35
-
PollyFoxk200227.10.2020 01:18
-
Ксюшка321521.02.2021 00:11
-
kamilapark107.02.2020 06:55