Автор Тема: Задача паскаль. Составить программу для построения таблицы значений  (Прочитано 7307 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Rydon

  • Новичок
  • *
  • Сообщений: 8
    • Просмотр профиля
всем привет, помогите плиз с задачкой на паскале

Составить программу для построения таблицы значений   х и у для функции y=x(х+73)-0,Зx при изменении x в диапазоне [-10, 10] с шагом 0.6. В колонках должны быть n, x, у>0, у<0, где n - номер по порядку.
n   x      y>0     y<0
1   -10   -627
2   -9,4
3

« Последнее редактирование: 16 Февраля 2010, 10:42:05 от Asix »

Оффлайн Rydon

  • Новичок
  • *
  • Сообщений: 8
    • Просмотр профиля
как вывести 3 колонки разобрался, но не могу понять как разделить у>0 и y<0
что тут исправить надо?

program iz4;
uses crt;
var b,c,d:array[1..100] of real; a:array[1..100] of integer;
n,i,j,k,m,x,z: integer;  l,o:real;
begin
clrscr;

n:=200 div 6;

o:=(-10);
l:=o;
write('n','x':10,'y>0':10,'y<0':10);
writeln;
j:=1;
for i:=1 to n do begin
a:=j;

  for k:=1 to n do begin
  b[k]:=l;
  end;
   for m:=1 to n do begin
   c[m]:=b[k]*(b[k]+73)-0.3*b[k];
   end;
j:=j+1; l:=l+0.6;
writeln(a,b[k]:10:1,c[m]:10:1);
end;
readkey; end.
« Последнее редактирование: 16 Февраля 2010, 10:42:11 от Asix »

 

Олимпиадная задача "Дипломы"

Автор DrXakep

Ответов: 0
Просмотров: 4919
Последний ответ 30 Декабря 2012, 14:09:40
от DrXakep
Срочно надо написать курсовую по информатике. Задача на языке VBA.

Автор lana

Ответов: 1
Просмотров: 4724
Последний ответ 12 Сентября 2010, 19:29:18
от InfStudent
Задача на строки в Паскале. Упорядочить и найти средний вес

Автор Ana

Ответов: 13
Просмотров: 6826
Последний ответ 23 Февраля 2010, 22:33:15
от Asix
Задача в бейсике, решить систему Гаусса-Зейделя

Автор Лопанова

Ответов: 1
Просмотров: 2758
Последний ответ 05 Октября 2011, 16:08:50
от tig81
Задача в Mathlab, определение количества шестизначных билетов

Автор wsxi11

Ответов: 3
Просмотров: 2848
Последний ответ 20 Декабря 2011, 11:17:45
от wital1984