Rss
Виртуальный кабинет МАТЕМАТИКУС
Популярное
Календарь
«    Декабрь 2020    »
ПнВтСрЧтПтСбВс
 123456
78910111213
14151617181920
21222324252627
28293031 
Журнал "Математика"
Математика
Счетчик посещений
счетчик посещений Рейтинг: Учеба
Flag Counter

Опросы
Оцените работу сайта

Интернет с пользой
Интернет с пользой
Знаток » Материалы за 01.12.2020
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 539
ПРИМЕР 2. Робот uses Robot;
procedure Row;
begin
while FreeFromRight do
begin Paint; Right; end;
Paint;Down;
while freeFromLeft do left;
end;
begin
field(17,17);
while FreeFromLeft do Left;
while FreeFromUp do Up;
while FreeFromDown do Begin Row; Down; end;
while FreeFromRight do Begin Paint; Right; end;
Paint;
end.
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 521
ПРИМЕР 1. РоботСкачать [366 b] (cкачиваний: 3)

Облако Тегов

{links}