Предмет: Информатика,
автор: khasanovaalina1
Задача #12
программа "АВС Паскаль"
Приложения:
![](https://files.topotvet.com/i/734/734ab302051319c14997d9dda5fe19a2.jpg)
Ответы
Автор ответа:
0
program zadan1;
uses crt;
var
x,y,z,i,j: integer;
begin
writeln;
for z:=1 to 4 do begin
for x:=1 to 4 do begin
writeln;
for y:=1 to 8 do
write('**** '); end;
for i:=1 to 4 do begin
writeln;
for j:=1 to 8 do
write(' ****');
end; end;
end.
uses crt;
var
x,y,z,i,j: integer;
begin
writeln;
for z:=1 to 4 do begin
for x:=1 to 4 do begin
writeln;
for y:=1 to 8 do
write('**** '); end;
for i:=1 to 4 do begin
writeln;
for j:=1 to 8 do
write(' ****');
end; end;
end.
Похожие вопросы
Предмет: Математика,
автор: Аноним
Предмет: Қазақ тiлi,
автор: shuldaiskira07
Предмет: Русский язык,
автор: Аноним
Предмет: Экономика,
автор: genius1258
Предмет: Алгебра,
автор: Pvia