Контрольная работа: Разработка программы на четырех языках программирования

Form1->Image1-> Canvas->MoveTo(235,110);

Form1->Image1-> Canvas->LineTo(235,170);

Form1->Image1-> Canvas->MoveTo(260,170);

Form1->Image1-> Canvas->LineTo(275,110);

Form1->Image1-> Canvas->LineTo(290,170);

Form1->Image1-> Canvas->MoveTo(270,140);

Form1->Image1-> Canvas-> LineTo(280,140);

}

//---------------------------------------------------------------------------

Вывод текста на экран

Turbo Pascal 7.0

program name;

uses crt;

begin

clrscr;

write('Karasov Danil ');

readln;

end.

Borland C++ 3.11

#include<stdio.h>

int main (void)

{

printf("'Karasov Danil ");

return 0;

}

Delphi7

unit Unit1;

interface

uses