3 в ней могут использоваться для записи числа только цифры 0, 1, 2
Надо узнать про профессию Что на ней делают как на ней работают поспрашивать всё
Миша теннис, Толя футбол, Дима бег Коля прыг
Program z1;
var a,b,p:integer;
begin
writeln('введите стороны прямоугольника');
readln(a,b);
p:=(a+b)*2;
writeln('Периметр равен ',p);
end.
1011
11/2=5
ост.1
5/2=2
ост1
2/2=1
ост0