1)вычислите периметр, длину диагонали и площадь прямоугольника - вопрос №14140901 от matherfather 14.04.2023 18:37

Question

Информатика: 1)вычислите периметр, длину диагонали и площадь прямоугольника по сторонам а и b 2) напишите программу для перевода дюймов в см. (1дюйм=2,54см) (паскаль)

matherfather · Answer

1.

var
a, b: real;

begin
readln(a, b);
writeln('P = ', 2 * a + 2 * b);
writeln('S =', a * b);
writeln('D =', sqrt(sqr(a) + sqr(b)));
end.

2.

var
a: real;

begin
readln(a);
writeln(a * 2.54);
end.