Question

Розв'язати задачі №2 і 5 з прикріпленого файлу. Код розв'язання мова паскаль

Answer 1

Відповідь:

2. Текст програми на мові програмування Pascal(результат виконання програми на фото):

program SquareArea;

var

a, S: real;

begin

writeln('Введіть довжину сторони квадрата: ');

readln(a);

S := a * a; // Обчислення площі квадрата

writeln('Площа квадрата: ', S:0:2);

readln;

end.

5. Текст програми на мові програмування Pascal(результат виконання програми на фото):

program CubeVolumeAndSurfaceArea;

var

a, V, S: real;

begin

writeln('Введіть довжину ребра куба: ');

readln(a);

V := a * a * a; // Обчислення об'єму куба

S := 6 * a * a; // Обчислення площі поверхні куба

writeln('Об''єм куба: ', V:0:2);

writeln('Площа поверхні куба: ', S:0:2);

readln;

end.