эльмирка1996пятница
Опубликовано 7 лет назад по предмету Информатика от эльмирка1996пятница


написать программу по информатике объема параллелепипеда

  1. Ответ
    Ответ дан andre740

    program _1_2;uses crt;var  dlina, shirina, vysota:real;begin  ClrScr;  TextColor(14);  Writeln('Вычисление объёма параллелепипеда.');  Writeln('Введите исходные данные:');  write('Длина (см) -> ');  readln(dlina);  write('Ширина (см) -> ');  readln(shirina);  write('Высота -> ');  readln(vysota);  writeln('Объём: ',(dlina*shirina*vysota):7:2);  Repeat  Until KeyPressed;end.

  2. Ответ
    Ответ дан Lenysiya

    program E8;

    var a, b, c, v: real;

    begin

    writeln('введите значения длины, ширины,высоты');

    readln(a,b,c);

    v:=a*b*c;

    writeln('v=', v:4:2);

    readln;

    end.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц