Составить программку на паскале, которая сформировывает на экране изображение. Если не

Составить программку на паскале, которая сформировывает на экране изображение. Если не трудно можно пожалуйста с комментариями. К сведению на рисунке 20 линий. Помогите пожалуйста буду очень признателен.

Задать свой вопрос
Igor
я полагаюсь эта картинка делается с помощью символов - _ / I и тому сходственных?
Олеся Чемодурова
Нет, конечно.
1 ответ
//PascalABC.NET
uses GraphABC;
var  c: integer;
begin
  window.IsFixedSize := true;//запрет конфигурации размера экрана
  window.Clear(cllightblue);//чистка экрана синим цветом
  pen.Color := clred;//меняем цвет пера на красноватый
  for var i := 0 to 19 do//цикл для отрисовки линий
  begin
    c := (window.Height div 19) * i;//сдвиг линнии по y
    line(0, 0 + c, window.Width, window.Height - c);//живописуем линию
  end;
end.
Наташка Подмосковная
Необходимо просто Pascal abc
Владислав Ананидзе
uses GraphABC;var c,i: integer;begin ClearWindow(rgb(173,216,230)); SetPenColor(clred); SetWindowSize(600,440); for i := 0 to 19 do begin c := (440 div 19) * i; line(0, 0 + c, 600, 440 - c); end;end.
Сыровец Лариса
В последующий раз пишите определенный язык програмирования
Леша Занемонец
спасибо огромное
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт