Question

СРОЧНО Напишите программу(на языке паскаль) по формуле любой

Answer 1

Ответ:

program ok;

var a,b,s:real;

begin

write ('a='); read(a);

write ('b='); read(b);

s:=ab;

write ('s=',s);

end.

Объяснение:

1)Просим ввести нужные данные.

2)Пишем формулу площади, по которой программа вычислит саму площадь.

3)Пишем ответ.

Я так понял, что по геометрической формуле. Если не по геометрической, то извини.

Answer 2

Конечно! Вот пример программы на языке Pascal, реализующей формулу x^2 + y^2:

pascalCopy code
program FormulaExample;

var
  x, y, result: real;

begin
  writeln('Введите значение x:');
  readln(x);
  
  writeln('Введите значение y:');
  readln(y);
  
  result := x * x + y * y;
  
  writeln('Результат формулы x^2 + y^2 = ', result);
  
  readln;
end.

В этой программе пользователю будет предложено ввести значения переменных x и y. Затем программа вычислит результат по формуле x^2 + y^2 и выведет его на экран.