Решите в паскале 1. даны действительные числа x, y. вычислить их разность и частное. 2. дана сторона квадрата. найти периметр, площадь и диагональ квадрата.

Alung Alung    1   06.09.2019 18:50    1

Ответы
KaterinaReyn KaterinaReyn  06.10.2020 21:39
1.
Var x,y:real;
Begin
read(x,y);
writeln(x-y);
writeln(x/y:2:2); // Округление до 3 знаков после запятой
End.

2.
Var x:real;
Begin
readln(x);
writeln(x*4); // Периметр
writeln(x*x); // Площадь
writeln((x * sqrt(2)):3:3); // Диагональ; Округление до 3 знаков после запятой
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика