Ответ:
4.
program Prog1;
var a, i: integer;
begin
for i:= 1 to 20 do
readln(a);
writeln(a);
end;
end.
5
var i: integer;
for i:= 50 to 100 do
if (i mod 2) = 1 then writeln(i);
6.
for i:= 50 downto 10 do
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
4.
program Prog1;
var a, i: integer;
begin
for i:= 1 to 20 do
begin
readln(a);
writeln(a);
end;
end.
5
program Prog1;
var i: integer;
begin
for i:= 50 to 100 do
if (i mod 2) = 1 then writeln(i);
end.
6.
program Prog1;
var i: integer;
begin
for i:= 50 downto 10 do
if (i mod 2) = 1 then writeln(i);
end.