
Luadkebhy
5 год назад
Написать программу на ЯП Паскаль. У равнобедренной трапеции основания равны N и M, боковая сторона равна K. Найти периметр трапеции?Прошу Пожалуйста посчитайте,срочно надо
ОТВЕТЫ

Boryana
Oct 24, 2020
var n,m,k,p:integer;
begin
writeln('n, m, k:');
readln(n,m,k);
p:=n+m+2*k;
writeln('p = ',p);
end.
Пример:
n, m, k:
5 3 4
p = 16
begin
writeln('n, m, k:');
readln(n,m,k);
p:=n+m+2*k;
writeln('p = ',p);
end.
Пример:
n, m, k:
5 3 4
p = 16
685
Смежные вопросы: