Ответы на вопрос:
program raf105;
var a: integer;
begin
while a< > 1 do
readln(a);
writeln('программа закончена');
end.
язык программирования pascalabc
Популярно: Информатика
-
natashalife06.04.2021 03:38
-
салманчик200818.02.2022 04:02
-
петро2601.02.2020 21:34
-
Kolelove05018.04.2023 03:04
-
Rita21060621.07.2022 22:23
-
daniil32622.08.2021 23:55
-
денуаааас07.11.2022 01:42
-
тима42105.03.2022 15:25
-
Taya20040121.07.2022 23:35
-
helphelhelphelplease27.11.2022 12:05