Question

Напишите программу которая вычисляет площадь и периметр прямоугольника по двум его сторонам. По Программе паскаль и с числами НА КОМПЬЮТЕРЕ!!! Пожалуйста))) ​​

Answer 1

Ответ:

program privet;

var x , y, p ,S:integer;

begin

read(x);

read(y);

p := 2*(x + y);

S := (x * y);

write('Периметр = ');

writeln (p);

write('Площадь= ');

writeln (S);

end.

Объяснение:

Answer 2

Конечно, вот программа на языке Pascal, которая вычисляет площадь и периметр прямоугольника по двум его сторонам:

pascalCopy code
program CalculateRectangleAreaAndPerimeter;

var
  Length, Width, Area, Perimeter: real;

begin
  writeln('Введите длину прямоугольника: ');
  readln(Length);
  
  writeln('Введите ширину прямоугольника: ');
  readln(Width);
  
  Area := Length * Width;
  Perimeter := 2 * (Length + Width);
  
  writeln('Площадь прямоугольника: ', Area);
  writeln('Периметр прямоугольника: ', Perimeter);
  
  readln;
end.

Просто скопируйте этот код в текстовый редактор, сохраните его с расширением .pas (например, RectangleCalculation.pas), а затем скомпилируйте и запустите программу на своем компьютере. Когда программа запустится, она попросит вас ввести длину и ширину прямоугольника, после чего она вычислит площадь и периметр и выведет результат на экран.