Напишите программу которая вычислит площадь геометрических фигур в Паскале.....1)Круг 2)прямоугольник 3)квадрат 4)паралеллограм

Есть ответ
18.12.2022
104

Ответ


1) по заданному радиусу:

 

Program n1;Uses CRT;Var r,s: real;beginClrScr;writeln('Vvedite radius');readln(r);s:=r*r*pi;Writeln('ploshad =',s:4:4);readlnend.

 

2) по заданным сторонам:

Program n1;Uses CRT;Var a,b,s: real;beginClrScr;writeln('Vvedite storoni');readln(a,b);s:=a*b;Writeln('ploshad =',s:4:4);readlnend.

 

3) по заданной стороне

Program n1;Uses CRT;Var a,s: real;beginClrScr;writeln('Vvedite storony');readln(a);s:=a*a;Writeln('ploshad =',s:4:4);readlnend.

 

3) по одной стороне и высоте к ней:

Program n1;Uses CRT;Var a,b,s: real;beginClrScr;writeln('Vvedite storony i vysoty k nei');readln(a,b);s:=a*b;Writeln('ploshad =',s:4:4);readlnend.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.