Помогите решить задачу по abc pascal даны стороны прямоугольника а и b. найдите периметр и полщадьS=a*b P=2*(a+b)a=6.90 b=5.80буду очень благодарна!
Помогите решить задачу по abc pascal даны стороны прямоугольника а и b. найдите периметр и полщадь
S=a*b P=2*(a+b)
a=6.90 b=5.80
буду очень благодарна!
Гость
Ответ(ы) на вопрос:
Гостьvar
a,b,p,s:real;
begin
Writeln('Введите значение а = ');
read(a);
writeln('Введите значение b = ');
read(b);
s:=a*b;
p:=2*(a+b);
writeln('Площадь = ',s);
Writeln('Периметр = ', p);
end.
Не нашли ответ?
Похожие вопросы