Ответы
Ответ дал:
0
Program P;
var a,b,c,d: integer;
begin
write ('Введите 1 сторону треугольника');
read(a);
write ('Введите 2 сторону треугольника');
read(b);
write ('Введите 3 сторону треугольника');
read(c);
d:=a+b+c;
write ('Периметр треугольника= ', d);
end.
Вас заинтересует
1 год назад
2 года назад
8 лет назад
9 лет назад