Question

ПОМОГИТЕЕ ПОЖАЛУЙСТАА,ПРОШУУ:((

Answer 1

1. program z2;
var i:integer;
begin
i:=1;
for i:=1 to i do
write(3);writeln;
i:=2;
for i:=1 to i do
write(3);writeln;
i:=3;
for i:=1 to i do
write(3);
end.
2. program z2;
var i:integer;
begin
i:=3;
for i:=1 to i do
write(3);writeln;
i:=2;write(' ');
for i:=1 to i do
write(3);writeln;
i:=1;write('  ');
for i:=1 to i do
write(3);
end.