Скажите пожалуйста где ошибка? Нужно найти периметр треугольника в Pascal ABC.
Program Perimetr_treug;
var a, b, c, P: real;
begin
writeln ('Введите стороны треугольника);
readln (a, b, c);
P:=a+b+c;
writeln ('P= ', P);
end.


1

Ответы и объяснения

Лучший Ответ!
2014-03-19T13:49:14+00:00
Попробуй так:
var P,a,b,c: integer;
readln(a);
readln(b);
readln(c);
P:= a+b+c;
writeln(' P=',P);
end.