Составить процедуру, "рисующую" на экране горизонтальную линию из 80
символов "*"
программа на паскаль abc
Ответы на вопрос
Ответил pupkinll2016
0
Ответ:
Процедура для рисования горизонтальной линии из 80 символов:
program draw_line;
procedure draw_horizontal_line();
var
i: integer;
begin
for i := 1 to 80 do
begin
write('*');
end;
writeln;
end;
begin
draw_horizontal_line();
end.
5Masya55:
программа не работает
Новые вопросы
Физкультура и спорт,
1 год назад
Қазақ тiлi,
1 год назад
Українська література,
1 год назад
Русский язык,
7 лет назад