Question

Помогите не могу сделать!!!

Answer 1

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var mh:=Arr(0.9,1.3,3.4,300.0,1000.0);
  var g:=9.8;
  foreach var h in mh do Writeln(h:6:1,Sqrt(h/g):8:2)
end.

Результат (форматирование здесь нарушено из-за использования пропорционального шрифта, на самом деле оно есть)
   0.9    0.30
   1.3    0.36
   3.4    0.59
 300.0    5.53
1000.0   10.10

begin
  var x:=0.0;
  while x<=4.01 do begin
    Writeln(x:3:1,2+x*x+Sin(2*x):15:5);
    x+=0.5
    end
end.

Результат
0.0        2.00000
0.5        3.09147
1.0        3.90930
1.5        4.39112
2.0        5.24320
2.5        7.29108
3.0       10.72058
3.5       14.90699
4.0       18.98936

Answer 2

На листке

Answer 3

1) На каком основании Вы мне "тыкаете"? 2) Что значит "скинуть"? Вам лень переписать это на листик?

Answer 4

Нет, вы эту работу делали в тетради или в программе на компьютере Excel

Answer 5

Нам задавали сделать в этой программе!

Answer 6

1) Это Паскаль, а не Эксель, написано же! 2) В Вашем задании не сказано, в какой программе делать - в таких случаях автор ответа вправе сам выбрать программу.