Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Ответ
 
Опции темы
Старый 22.03.2015, 14:09   #1
etharda
Новичок
Джуниор
 
Регистрация: 22.03.2015
Сообщений: 1
По умолчанию Помогите проверить программы.

Помогите проверить программы и исправить ошибки.
И, если можно, скинуть скриншот, как будут выглядеть рисунки в конечном итоге.
Онлайн паскаль многие модули не распознает, установить программу на компьютер нет возможности.
Заранее большое спасибо.
Код:
program n1;
uses graphabc;
begin
setwindowsize(200,180);
line(70,20,180,20);
lineto(140,50);
lineto(30,50);
lineto(70,20);
floodfill(105,35,clred);
line(140,50,180,20);
lineto(180,130);
lineto(140,160);
lineto(140,50);
floodfill(160,90,clgreen);
rectangle(30,50,140,160);
floodfill(85,105,clblue);
end.
Код:
program n2;
uses graphabc;
begin
setwindowsize(120,120);
line(50,20,100,70);
lineto(80,100);
lineto(50,20);
floodfill(75,60,clnavy);
line(50,20,80,100);
lineto(20,100);
lineto(50,20);
floodfill(50,60,clcream);
end.
etharda вне форума Ответить с цитированием
Старый 22.03.2015, 15:40   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,263
По умолчанию

это не сложно.

ловите скрины:
program_n1.jpg

program_n2.jpg
Serge_Bliznykov вне форума Ответить с цитированием
Ответ
Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проверить правильность программы. JellyFilled Паскаль, Turbo Pascal, PascalABC.NET 4 21.10.2014 08:28
Проверить программы Putin-mode Assembler - Ассемблер 0 07.11.2013 21:16
Как проверить наличие программы googl Общие вопросы Delphi 13 22.03.2012 16:14
Проверить работоспособность PHP-программы Katus Общие вопросы Web 11 05.02.2012 07:21
Прошу проверить код программы Pashtet Паскаль, Turbo Pascal, PascalABC.NET 1 19.11.2008 12:50