ответ:36
Объяснение:1) a=12+12*8=108
2) b=108/3=36
Площадь параллелограмма:
program chet;
var
sq, a , b : integer;
begin
writeln('Введите стороны параллелограмма ');
readln(a,b);
sq := a * b;
writeln('Площадь параллелограмма равна ', sq);
end.
Площадь трапеции:
program chet;
var
sq,h, a , b : real;
begin
writeln('Введите длину оснований ');
readln(a,b);
writeln('Введите высоту трапеции');
read(h);
sq := (a+b)/2 * h;
writeln('Площадь трапеции равна ', sq);
end.
Площадь круга:
program chet;
const
PI = 3.14;
var
sq,r : real;
begin
writeln('Введите радиус круга');
readln(r);
sq := PI * sqr(r);
writeln('Площадь круга равна ', sq);
end.
И площадь ромба:
program chetdsa;
var
sq,d,g : real;
begin
writeln('Введите чему равны диагонали ромба');
readln(d,g);
sq := (d*g)/ 2;
writeln('Площадь ромба равна ', sq);
end.
Поделитесь своими знаниями, ответьте на вопрос:
Определите значение b после выполнения алгоритма: а:= 12 b:= 8 a:= a + a*b b:= a/3
Если округлять до двух знаков то 3.60
Объяснение:
program Hello;
var a,b: double;
begin
a:= 12;
b:= 8;
a:= a + a*b;
b:= a/3;
write(b);
end.