Ответы на вопрос:
// pascalabc.net 3.2, сборка 1485 от 15.06.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(14,-99,99); a.println; writeln('среднее арифметическое равно ',a.average) end. пример 64 -26 -70 -42 86 46 -72 -6 82 56 52 14 41 -97 среднее арифметическое равно 9.14285714285714
Код pascal: const n = 14; var c: array[1..n] of integer; i: integer; s: real; begin randomize; write('c(',n,'): '); s: =0; for i: = 1 to n do begin c[i]: =random(21)-10; write(' ',c[i]); s: =s+c[i] end; writeln; write('sr(c) = ',s/n); end.
int x = 0;
cout << "Введите число: ";
cin >> x;
cout << "ответ: " << x+1;
Популярно: Информатика
-
иван205422.10.2021 09:23
-
vgubajdullin19.12.2022 06:34
-
OшUb0чkA15.02.2021 04:12
-
maryana07080306.10.2021 10:29
-
Мария5544525.04.2021 16:25
-
Katyusha436825.09.2022 19:34
-
maryamromanenko129420.03.2020 16:45
-
operovist23.03.2022 02:35
-
школьник61912.01.2021 22:02
-
abbasbayaliev15.05.2022 20:36