Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1001 и 1001 1001
Объяснение:
program xxx;
var a, b, c, p, s : real;
begin
wtiteln('введите катет а-');
read(a);
wtiteln('введите катет b-');
read(b);
s: =(a*b)/2;
writeln('площадь треугольника =', s);
c: =sqrt(sqr(a)+sqr(b));
p: = a+ b + c;
writeln('периметр треугольника =', p);
end.
1 байт/с = 23 бит/с = 8 бит/с; 1 кбит/с = 210 бит/с = 1024 бит/с; 1 мбит/с = 210 кбит/с = 1024 кбит/с; 1 гбит/с = 210 мбит/с = 1024 мбит/с.
Популярные вопросы