Программа с «неудобным» интерфейсом

program korobok;

var shirina, tol, ploshad : integer;

visota, objom : real;

begin

readln(shirina, tol, visota);

ploshad:=shirina * tol;

objom:=ploshad * visota;

writeln(ploshad, objom:10:2);

end.

Программа с «удобным» интерфейсом.

program korobok; {нахождение площади основания и объёма параллелепипеда}

var shirina, tol, ploshad : integer;

visota, objom : real;

begin

writeln('введите ширину, толщину, высоту');

readln(shirina, tol, visota);

ploshad:=shirina * tol;{нахождение площади основания}

objom:=ploshad * visota;{вычисление объема параллелепипеда}

writeln('площадь ',ploshad,' ','объём',objom:10:2);

readln

end.

program dialog;

var imya:string;

vozrast:integer;

begin

writeln('здравствуй, я компьютер, а тебя как зовут?');

readln(imya);

writeln('очень приятно, ',imya,'. Сколько тебе лет?');

readln(vozrast);

writeln('ого! целых ',vozrast,' лет! Ты уже совсем взрослый!')

end.

Линейные алгоритмические конструкции

Линейные программы

В линейной алгоритмической конструкции операторы выполняются последовательно друг за другом. При каждом выполнении такой программы она выполняется вся целиком, то есть выполняются все её операторы.

В линейных программах используются три оператора: оператор ввода, оператор присваивания, оператор вывода.