Составить программы для вычисления значений функции при заданных значениях аргументов

@Rurouni · Регистрация: 14.02.2013

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста.
Составить блок-схемы алгоритмов и программы на языках Бейсик и Паскаль для вычисления значений функции при заданных значениях аргументов. Результаты вычислений вывести в виде таблицы. Выполнить задание двумя способами: а) не используя структуру цикл с параметром; б) используя в качестве циклической структуры только цикл с параметром.

Название: Безымянный.png
Просмотров: 395

Размер: 1.1 Кб

Название: Безымянный.png
Просмотров: 395

Размер: 1.1 Кб

a=0.1,0.2 .. 0.5; y=1.0,1.2 .. 1.6

@Puporev · 14.02.2013, 09:23

Pascal

uses crt;
function F(a,y:real):real;
var p:real;
    k:byte;
begin
p:=1;
k:=1;
while k<=8 do
 begin
  p:=p*exp(ln(y-a)*k/3);
  k:=k+1;
 end;
F:=p
end;
var a,y,da,dy:real;
begin
clrscr;
da:=0.1;
dy:=0.2;
a:=0.1;
while a<=0.5+da/2 do
 begin
  y:=1.0;
  while y<=1.6+dy/2 do
   begin
    writeln('a=',a:4:1,' y=',y:4:1,' F=',F(a,y):7:3);
    y:=y+0.2;
   end;
  a:=a+0.1;
 end;
readln
end.

Pascal

uses crt;
function F(a,y:real):real;
var p:real;
    k:byte;
begin
p:=1;
for k:=1 to 8 do
p:=p*exp(ln(y-a)*k/3);
F:=p
end;
var a,y,da,dy:real;
    m,n,i,j:byte;
begin
clrscr;
m:=5;
n:=4;
da:=0.1;
dy:=0.2;
for i:=1 to m do
 begin
  a:=i*da;
  for j:=1 to n do
   begin
    y:=0.8+j*dy;
    writeln('a=',a:4:1,' y=',y:4:1,' F=',F(a,y):7:3);
   end;
 end;
readln
end.

@Rurouni 0 / 0 / 0 Регистрация: 14.02.2013 Сообщений: 5
		1
	Составить программы для вычисления значений функции при заданных значениях аргументов 14.02.2013, 00:13. Показов 2533. Ответов 1 Метки нет (Все метки) Помогите пожалуйста. Составить блок-схемы алгоритмов и программы на языках Бейсик и Паскаль для вычисления значений функции при заданных значениях аргументов. Результаты вычислений вывести в виде таблицы. Выполнить задание двумя способами: а) не используя структуру цикл с параметром; б) используя в качестве циклической структуры только цикл с параметром. a=0.1,0.2 .. 0.5; y=1.0,1.2 .. 1.6 0

	14.02.2013, 09:23

Составить программы для вычисления значений функции при заданных значениях аргументов

Решение