Ответ:
var
a: string;
i: integer;
begin
a:='Ростик';
for i:= 1 to 7 do
writeln(a);
readln;
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
var
a: string;
i: integer;
begin
a:='Ростик';
for i:= 1 to 7 do
writeln(a);
readln;
end.