var b,p,s,x,a:real;
begin
read(b);
x:=sqrt(sqr(b)/2);
a:=x*2;
writeln('P= ',(b+b+a):2:2);
writeln('S= ', a*x*0.5);
end.
после (b+b+a):2:2 означает округление до 2 знаков после запятой
1200/20=60кб/сек
60*30=1800кб
Ответ: размер файла составляет 1800 кб
Мышь, тачпад и трекбол выполняют функцию комп.мыши, получается, что лишнее - клавиатура
Число -10 не больше или равно двум, не лежит в пределах от 1 до 4, Не равняется 2, 10, -4, 3, 7, при умножении на себя не даёт число, меньшее нулю. Значит, что программа выведет: "дерево"