Программирование,паскаль.,умоляю,. задали написать программу на язвке паскаль: вычислить и вывести на экран 8 первых элементов ряда если каждый элемент задан формулой а1= i/sin*i

226

255

Посмотреть ответы 3

Ответы на вопрос:

Dimka3113

Информатика

4,5(56 оценок)

Вот без массивa: var i: integer; begin for i: =1 to 8 do writeln(i/sin(i)); end.

витно

Информатика

4,8(38 оценок)

№1. программа на паскале

program xxx;

var n : integer;

x : array[1..8] of integer;

begin

for n: =1 to 10 do

x[n]: =i/sin*i;

wreteln('последовательность х: ')

for n: =1 to 8 do

write(x[i]);

readln

end.формулу проверь свою,вроде так

28883

Информатика

4,8(26 оценок)

// pascalabc.net 3.3, сборка 1590 от 03.12.2017 // внимание! если программа не работает, обновите версию! begin var (a,b): =readinteger2('введите два числа'); if a> b then swap(a,b); range(a,b).select(x-> x*x).println end. пример введите два числа 29 6 36 49 64 81 100 121 144 169 196 225 256 289 324 361 400 441 484 529 576 625 676 729 784 841