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

@xxxANDRUXAxxx · Регистрация: 10.12.2009

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

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

@Puporev · 09.03.2010, 07:47

Для примера в 3 строки.

Pascal

uses crt;
var y:array[1..30] of real;
    i:byte;
begin
clrscr;
for i:=1 to 30 do y[i]:=cos(i);
writeln('Значения функции cos(i) при i=[1..30]:');
for i:=1 to 30 do
 begin
  write(y[i]:8:4);
  if i mod 10=0 then writeln;
 end;
readln
end.

@xxxANDRUXAxxx 8 / 7 / 2 Регистрация: 10.12.2009 Сообщений: 104
		1
	Ввести элементы одномерного массива размером 30 как значения произвольной функции 09.03.2010, 07:13. Показов 1392. Ответов 1 Метки нет (Все метки) Ввести элементы одномерного массива размером 30 как значения произвольной функции и вывести на печать в несколько строчек. 0

Опции темы

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

Решение