
Гапон
5 год назад
данны сторны прямоугольника найти его периметрпример как делать дано время в чесах и в минутах выразить его в минутахvar C,A,B:inter;beginwriteln ('Введите время в часах и в минутах');readln;C:=A*60+B;writeln ( ' время в минутах');readln;end.
ОТВЕТЫ

Lyubcho
Oct 24, 2020
var a,b,p:integer;
begin
writeln ('Введите стороны прямоугольника:');
readln(a,b);
p:=2*(a+b);
writeln ( 'Периметр прямоугольника = ',p);
readln;
end.
Пример:
Введите стороны прямоугольника:
3 5
Периметр прямоугольника = 16
begin
writeln ('Введите стороны прямоугольника:');
readln(a,b);
p:=2*(a+b);
writeln ( 'Периметр прямоугольника = ',p);
readln;
end.
Пример:
Введите стороны прямоугольника:
3 5
Периметр прямоугольника = 16
32