Отчет по практике: Редактирование и отладка программ с помощью Pascal

Задание14. Составить алгоритм вычисления A=x² +bx/2

program as; Блок-схема

uses crt;

var a,b,x,z,s,v:real;

begin clrscr;

writeln('Введи значение x,b');

Z:=x*x*x*x*x

readln(x,b);

S:=b*x

z:=x*x*x*x*x;

s:=b*x;

V:=z+s

v:=z+s;

A:=v/2;

A:=v/2

writeln('A=',a);

readln;

end.

(Вводим значение 2,3)

Ответ: 1.9

Задание15.Определить время падения камня на поверхность земли с высоты h.

program as; Блок-схема

uses crt;

var g,t,h:real;

begin clrscr;

writeln('Введи значение h');

G:=9.81

readln(h);

t:=sqrt(2*h/g);

T:=sqrt(2*h/g)

writeln('????? ???????=',t);

readln;

end.

(Вводим значение 10 м)

Ответ: 1,4278с