Ответы
Ответ дал:
0
program Perimeter;
var a, b, c, p :integer;
begin
write('Введите стороны треугольника (через пробел): ');
readln(a, b, c);
p:= a + b + c;
writeln('Периметр треугольника равен ', p)
end.
var a, b, c, p :integer;
begin
write('Введите стороны треугольника (через пробел): ');
readln(a, b, c);
p:= a + b + c;
writeln('Периметр треугольника равен ', p)
end.
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад
8 лет назад