Обзор программ часть 1: Free Pascal

В ней можно писать : Для того чтобы выводился текст: Program One; Uses CRT; Begin CLRSCR; Write('Текст'); Reakey End. Для решения: Programs arifmetika; Uses CRT; Var a, b, summa, proizv: INTEGER; Begin CLRSCR; Writeln(&Vvedi a, b'); Readln(a,b); Summa:=a+b; Proizv:=a*b; Writeln(&summa=&summa); Writeln(&proizvedenie&proizv); Readln End.