Ответ №1
№1
На паскале:
program perimtr;
uses crt;
var a,b,c,p : real;
begin
write('Введите стороны треугольника');
readln(a,b,c);
p:=a+b+c;
write('Периметр треугольника равен:',p);
end.
Ответ №1
№1
На паскале:
program perimtr;
uses crt;
var a,b,c,p : real;
begin
write('Введите стороны треугольника');
readln(a,b,c);
p:=a+b+c;
write('Периметр треугольника равен:',p);
end.
Знаете ответ?