СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ

Благодаря готовым учебным материалам для работы в классе и дистанционно

Скидки до 50 % на комплекты
только до 15.07.2025

Готовые ключевые этапы урока всегда будут у вас под рукой

Организационный момент

Проверка знаний

Объяснение материала

Закрепление изученного

Итоги урока

ГРАФИЧЕСКИЕ ВОЗМОЖНОСТИ ЯЗЫКА ПРОГРАММИРОВАНИЯ PASCALABC

Категория: Информатика

Нажмите, чтобы узнать подробности

ПРОГРАММА СОЗДАЕТ РИСУНОК (ЦВЕТА RGB, ВЫБИРАЕМЫЕ СУЧАЙНЫМ ОБРАЗОМ).

ЦИКЛ СОЗДАЕТ МЕРЦАЮЩУЮ ОТКРЫТКУ

uses graphabc;

var a:integer;

begin

a:=0;

while true do  begin  

a:=random(480);

SetWindowSize(640,480);  

SetPenColor(rgb(random(255), random(255), random(255)));  

Line(0+a,0+a,640-a,480-a);   Line(640-a,0+a,0+a,480-a);

end;

end.

ВЫВОДИТ НА ЭКРАН:

 

Показать полностью


Скачать

Рекомендуем курсы ПК и ППК для учителей

23.02.2019 21:29
Альбицкая Нина Ефимовна @bio55
Нравится
23.02.2019 21:29
Альбицкая Нина Ефимовна @bio55
Спасибо большое, Нина Викторовна
04.08.2017 14:34
Аверина Нина Викторовна @averinanina
Хороший пример применения модуля graphabc в Pascalи организация циклов!
При запуске в Pascal открытка мерцает!

Вебинар для учителей

Свидетельство об участии БЕСПЛАТНО!