Вывести "столбиком" значения: sin2 sin4 sin6 ......sin20

Знания

Информатика

1 ответ:

Евгений93154 года назад

0 0

Var A:integer;
Begin
For A:=1 to 10 do
WriteLn('Sin(',A*2,') = ',Sin(2*A):0:7)
End.

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

Заполнить массив из 10 элементов случайными числами в интервале [-10..10] и найти в нем максимальный и минимальный элементы и их

Марина Алексеева

<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>

begin

var a := ArrRandom(10, -10, 10);

a.Println;

var i := a.IndexMax;

Writeln('максимальный a[', i + 1, ']=', a[i]);

i := a.IndexMin;

Writeln('минимальный a[', i + 1, ']=', a[i])

end.

<h2>-2 0 -3 0 3 -2 1 -9 -9 -2</h2><h2>максимальный a[5]=3</h2><h2>минимальный a[8]=-9</h2>

0 0

1 год назад

Дано число m и одномерный массив x(m). Составить программу, которая выводить на печать нулевые элементы помогите очень надо)))

olga46

Program n1;
const nn=1000;
var x: array[1..nn] of integer;
m,i:integer;
begin
writeln('Введите размерность массива'); readln(m);
writeln('Введите массив');
for i:=1 to m do readln(x[i]);
for i:=1 to m do
if x[i]=0 then write(x[i],' ');
end.<span>
</span>

0 0

2 года назад

Каждая буква русского алфавита кодируется трехзначным десятичным целым числом. Имеется код: 225242225242225244. Какое слово, из

Crocodiller [15]

Я не знаю как кодируются русские буквы, но глядя на цифровую последовательность
1 2 1 2 1 3
225 242 225 242 225 244

тут всего 3 буквы получается
Буквы идут поочереди, только последняя отличается
т.е должно быть 3 разные буквы

я думаю это в) АРАРАТ
тут 3 буквы А, Р, Т

0 0

4 года назад

Прочитать ещё 2 ответа

СРОЧНО! ИНФОРМАТИКА! Разведчик шифрует текст, используя 16 символов. При этом использует код с постоянной длиной, и каждый симв

winona [171]

для кодирования 16 символов потребуется 4 бита

2^4=16

40*4=160 бит=20 байт

0 0

4 года назад

Помогите пожалуйста решить задания по информатике. Хотя бы несколько)Буду вам очень благодарна)

людмила Новик [1]