Программа, выводящая 21 раз слово "Russia". var i : integer;
begin
for i := 1 to 21 do
readln;
end.
var i : integer;
begin
for i := 1 to 21 do
writeln ('Russia ');
readln;
end.
var i : integer;
begin
for i := 1 downto 21
writeln ('Russia ');
readln;
end.
var i : integer;
begin
i := 1 to 21 do
writeln ('Russia ');
readln;
end.
280
427
Ответы на вопрос:
Program p1; var a: byte; begin write('введите а, а='); readln(a); writeln('сумма цифр = ', a div 10 + a mod 10); end.
Популярно: Информатика
-
sPHAgNUM126.12.2022 14:22
-
Татьяна6410101.07.2022 04:38
-
илья196825.10.2021 20:45
-
thgWedMwe08.09.2021 14:09
-
natakalip09wj023.03.2022 12:49
-
nadyasvetlakov18.12.2020 02:56
-
Апуля1101.03.2020 04:48
-
hers2520.10.2021 16:46
-
SeamCard13.05.2020 10:55
-
dashaloh00019.11.2022 16:42