Предмет: Информатика,
автор: mrr1ght
Pascal ABC
Цикл for to do
Задание в файле
Помогите пожалуйста
Приложения:
Ответы
Автор ответа:
0
VAR
i, j: Integer;
BEGIN
Write(' ');
for i := 1 to 9 do Write(i,' '); Writeln;
for i := 1 to 9 do begin
Write(i,' ');
for j := 1 to 9 do
if (i*j > 9) then Write(i*j,' ')
else Write(i*j,' ');
Writeln;
end;
END.
i, j: Integer;
BEGIN
Write(' ');
for i := 1 to 9 do Write(i,' '); Writeln;
for i := 1 to 9 do begin
Write(i,' ');
for j := 1 to 9 do
if (i*j > 9) then Write(i*j,' ')
else Write(i*j,' ');
Writeln;
end;
END.
Автор ответа:
0
в 5 строке - 4 отступа
Автор ответа:
0
в 8 строке - 4 отступа
Автор ответа:
0
в 10 строке - 3 отступа
Автор ответа:
0
в 11 строке - 4 отступа
Автор ответа:
0
отступы ставятся во Write, между ' '
Интересные вопросы
Предмет: Физкультура и спорт,
автор: bigbabybeach228
Предмет: Қазақ тiлi,
автор: WLG1IK
Предмет: Русский язык,
автор: Аноним
Предмет: Алгебра,
автор: twinkleTTS