Предмет: Информатика, автор: khasanovaalina1

Задача #12
программа "АВС Паскаль"

Приложения:

Ответы

Автор ответа: Sashazavr
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.
Похожие вопросы
Предмет: Алгебра, автор: Pvia