Программу счета периметр прямоугольника создавать Паскаль Черта алгоритмПомогитее(

Программу счета периметр прямоугольника создавать Паскаль Черта алгоритм Помогитее(
Гость
Ответ(ы) на вопрос:
Гость
program znanija; const INPUT_SIDE_A = 'Введите A: '; INPUT_SIDE_B = 'Введите B: '; OUTPUT_PERIMETER = 'Периметр равен: '; var   sideA : integer;   sideB : integer;   perimeter : integer; begin write(INPUT_SIDE_A); read(sideA); write(INPUT_SIDE_B); read(sideB); perimeter := 2 * (sideA + sideB); write(OUTPUT_PERIMETER); write(perimeter); end.  
Гость
var   a, b, p: real; begin   Write('Введите через пробел длины сторон: ');   Readln(a, b);   p := 2 * (a + b);   Writeln('Периметр прямоугольника равен ', p:0:2) end. Тестовое решение: Введите через пробел длины сторон: 12.3 9.18 Периметр прямоугольника равен 42.96 Блок-схема находится во вложении.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы