Выбери верный ответ.
Программа, выводящая 40 раз слово "Russia".
1. var i : integer;
begin
i := 1 to 40 do
writeln ('Russia ');
readln;
end.
2. var i : integer;
begin
for i := 1 to 40 do
readln;
end.
3. var i : integer;
begin
for i := 1 to 40 do
writeln ('Russia ');
readln;
end.
4. var i : integer;
begin
for i := 1 downto 40
writeln ('Russia ');
readln;
end.
3
Объяснение:
program pascal_6_forq;
uses crt;
var
i: Integer;
begin
for i:=1 to 40 do
begin
Writeln('russia, ');
end;
readln;
end.