РЕАЛИЗАЦИЯ ОСНОВНЫХ АЛГОРИТМИЧЕСКИХ КОНСТРУКЦИИ НА ЯЗЫКЕ ...

Сергей

Линейная структура на языке PascalНахождение расстоянияvar V,S,t:real;beginreadln(V,t);S:=V*t;writeln(S);end.Ветвлениеvar a,b:integer;beginreadln(a,b);if (a>b) then writeln('+++') elsewriteln('---');readln;end.Циклvar i:integer;beginfor i:=1 to 5 do writeln(i);readln;end.