<u>Вот текст:</u> Попытка не пытка<u>.</u>
Зайти в ютуб, написать как оформить сценарий для призентаций тебе подробно и понятно раскажут
...............................
Знак 8 бит = 1 байту.
104 зн * 1 байт = 104 байта
Var a,b,c,p:integer;
s,p1:real;
begin
writeln('a=');
readln(a);
writeln('b=');
readln(b);
writeln(c);
readln(c);
p:=a+b+c;
p1:=(a+b+c)/2;
s:=sqrt(p1*(p1-a)*(p1-b)*(p1-c));
writeln('perimetr=',p,' plosciadi=',s);
readln;
end.