Program comparison;
var
a,b,c:real;
begin
write ('Введите первое число:');
readln(a);
write ('Введите второе число:');
readln(b);
if a>b then
begin
c:=a-b;
write ('Первое число больше второго на ', c);
end;
if a<b then
begin
c:=b-a;
write ('Второе число больше первого на ', c);
end;
if a=b then
write ('Числа равны');
end.
Обозначение:
-
Тип результата:
integer
Два раздела: (I) раздел описаний (блоки USES, LABEL, CONST, TYPE, VAR, а также описание процедур и функций) и (II) исполняемую часть (основной блок) . Раздел описаний, в принципе, не является обязательным и может вовсе отсутствовать. Заголовок программы, начинающийся с ключевого слова PROGRAM, выполняет исключительно декоративную функцию, и поэтому также может отсутствовать.
<span>Основной блок - это собственно программа, использующая все, что было описано и объявлено выше. Он обязательно начинается словом BEGIN и заканчивается словом END с точкой. Любой текст после завершающей точки игнорируется компилятором</span>