Question

Помогите создать пожалуйста не сложную программу паровoза(любого) для Pascal ABC

Answer 1

Например программаPaint

Answer 2

Конечно, вот пример простой программы паровоза на Pascal ABC:

program Parovoz;
uses crt;

var i: integer;

begin
  clrscr;
  
  writeln(' __________0000___________0000_________');
  writeln(' ________00____00_______00____00______');
  writeln(' _______00______00_____00______00_____');
  writeln(' ______00________00___00________00____');
  writeln(' _____00__________00_00__________00____');
  writeln(' ____00____________000____________00___');
  writeln(' ___00____________________________00___');
  writeln(' ___00____________________________00___');
  writeln(' ___00____________________________00___');
  writeln(' ___00___________0000_____________00___');
  writeln(' ___00______00________00_________00____');
  writeln(' ____00______00______00_________00_____');
  writeln(' _____00_______00____00_______00______');
  writeln(' ______00_______00__00_______00_______');
  writeln(' _______00________000_______00________');
  writeln(' ________00________________00_________');
  writeln(' _________00______________00__________');
  writeln(' ___________00__________00____________');
  writeln(' _____________00______00______________');
  writeln(' _______________000000________________');
  
  readln;
end.

Это простая программа, которая выводит на экран изображение паровоза, составленное из символов. Программа использует процедуру `clrscr`, чтобы очистить экран перед выводом изображения. В программе также используется цикл `for` для вывода каждой строки изображения.