Регистрация
Неизвестный17781
12.02.2020 12:40
Информатика
Есть ответ 👍

Переделать программу в процедуру program nolik; uses crt; var x,y: integer; begin repeat x: =40; y: =1; repeat gotoxy(x,y); write (0); y: =y+1; x: =x+3; delay(100); clrscr; until x> 70; repeat gotoxy(x,y); write(0); y: =y+1; x: =x-3; delay(100); clrscr; until y> 24; repeat gotoxy(x,y); write(0); y: =y-1; x: =x-3; delay(100); clrscr; until x< 4; repeat gotoxy(x,y); write(0); y: =y-1; x: =x+3; delay(100); clrscr; until y< 3; until keypressed; readln; end.

140
237
Посмотреть ответы 1

Ответы на вопрос:

ivanovaanyuta
ivanovaanyuta
4,5(84 оценок)
Легко, открой меню пуск и выполнить, и напиши в том окошке которое ты открыла  dxdiag и нажми enter и там будет сведения о системе и все увидишь

Популярно: Информатика