profile
Опубликовано 5 лет назад по предмету Информатика от khasanovaalina1

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

  1. Ответ
    Ответ дан Sashazavr
    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.
Самые новые вопросы