Все категории

4 года назад

Помогите пж, надо на языке Паскаль написать

Знания

Информатика

2 ответа:

Lector [7]4 года назад

0 0

var

S, S1 : real;

N : integer;

begin

readln(N);

for var i := 1 to N do begin

S1 += sin(i);

S += 1/S1;

end;

writeln(S);

end.

протестиовано в PascalABC.Net в других версиях паскаля синтаксис может незначительно отличаться.

AndyStolz4 года назад

0 0

Смотрите картинки и соотв. им файлы *.pas Написаны в PascalABC.NET

Читайте также

Вопросы по программе Word: 1.Гипертекст-это... ? 2.Чтобы ввести гиперссылку,надо выбрать... ? 3.Чтобы оформить маркировку надо..

ШоперЛюкс [14]

1. Гипертекст-это система из текстовых страниц, имеющих перекрёстные ссылки.

Пример гипертекста это энциклопедии в которых можно переходить с одной страницы на другую и выполнять поиск по ключевым словам.

2.Надо ссылку которую ты хочешь ввести вынести на роб. стол, потом нажимаешь в Word: Вставка-Ссылки-Гиперссылка-(находишь ссылку и нажимаешь)

3.Во вложении 1

4.Во вложении 2

0 0

4 года назад

Найти значени выражение 220div 10mod 3 = (16 mod 6)/(2 div 1) =

Любмила [1]

1) 1
2) 2

(20 СИМВОЛОВ))))

0 0

3 года назад

Информатика массив найти кол во элементов <10

nadezh888 [98]

Var
m: array [1 .. 16] of integer;
i,countMin: integer;
begin
 for i := 1 to 16 do
 begin
 randomize;
 m[i] := random(100);
 if(m[i] <10) then
 countMin:=countMin+1;
 end;
 writeln('Исходный массив');
 for i := 1 to 16 do
 writeln('m[', i, ']=', m[i], ' ');
 writeln("Количество элементов <10",countMin);
 readln;
 end.

0 0

3 года назад

Нужно сделать номер 4

Ричи999

Если не показывабют число значит оно умножено на 0

а) 10010

б) 1030200

0 0

4 года назад

Задание 3. Напишите программу на Паскале для решения следующей задачи. Даны два числа x и y, не равные друг другу. Меньшее из эт

Таня2012

Вариант программы и результата её выполнения на скриншотах.

0 0

4 года назад