На дополнительной клавиатуре специальная клавиша нам лук.
Var a,b,y:integer;
begin
writeln('Введите 2 числа a и b'); readln(a,b);
if a=b
then y:=1
else if a>b
then y:=2
else y:=3;
writeln('y= ', y);
end.
Персональный комп. бывает-Настольным, Переносным, Наладонным.
Если фигура круг то это начало-конец
Если фигура паралелограмм то это ввод -вывод
Если это четырёхуголник то это действие(тоесть вычисления)