var
a : array of real := (3.2,2.5,0,0.7,0,-1.3,4.3,-2.9,0,-0.4,-5.2,3.4);
n : integer;
s : real;
begin
writeln('массив a = ', a);
write('номера элементов равных 0: ');
for var i :=0 to a.Length-1 do begin
if a[i] = 0 then write(' ', i);
if a[i] > 0 then begin
n += 1;
s += a[i];
end;
end;
writeln;
writeln('s = ', s/n);
end.
Цены взяты с сайта <span>h t t р : / /w w w .сitilink. r u /</span>
1) Всего 7720.00 руб.
1. Процессор 32- или 64-разрядный процессор с тактовой частотой 1 ГГц или выше с набором инструкций SSE2 Процессор AMD Athlon II X2 220 1600 руб.2. Оперативная память 1 ГБ (для 32-разрядных систем); 2 ГБ (для 64-разрядных систем) Модуль памяти AMD R532G1601S1S-UO DDR3 — 2Гб 730 руб.3. Свободное место на жестком диске 3 ГБ свободного места на диске Жесткий диск SEAGATE Samsung Momentus ST320LM001
2740 руб.4. Для использования аппаратного ускорения требуется видеоадаптер, поддерживающий DirectX 10 Разрешение 1280 x 800
Видеокарта MSI GeForce 210 1940 руб.
5. Блок питания Блок питания ACCORD ACC-P300W 710 руб.
2)
<span>Процессор Intel® Core 2 или AMD Athlon® 64; 2 ГГц или более быстрый<span>Microsoft Windows 7 с пакетом обновления 1, Windows 8.1 или Windows 10
</span>2 ГБ ОЗУ (рекомендуется 8 ГБ)2 ГБ свободного пространства на жестком диске для установки 32-разрядной версии; 2,1 ГБ свободного пространства на жестком диске для установки 64-разрядной версии; во время установки требуется дополнительное свободное пространство (не устанавливается на съемные устройства флэш-памяти)Монитор с разрешением 1024x768 (рекомендуется 1280x800), поддержкой 16-битного цвета, а также 512 МБ видеопамяти (рекомендуется 1 ГБ)*Система с поддержкой OpenGL 2.0<span>Для обязательной активации программного обеспечения, подтверждения подписки и доступа к онлайн-услугам требуется подключение к Интернету и регистрация**
3)
</span></span><span><span>Процессор Intel® Pentium® 4 с тактовой частотой 1,4 ГГц или аналогичный процессор AMD® с поддержкой SSE2* 3</span>2 ГБ оперативной памяти (рекомендуется 4 ГБ)<span>2 ГБ в файле подкачки (рекомендуется 4 ГБ**) 4</span>3 ГБ свободного места на жестком диске<span>Графический адаптер, поддерживающий Direct3D® 10, Direct3D 9 или OpenGL5</span>Не менее 512 MБ памяти на видеокарте (рекомендуется 1 ГБ и выше)Трехкнопочная мышь с установленным драйвером<span>Привод DVD-ROM6</span><span>Подключение к Интернету для загрузки файлов и доступа к Autodesk® Subscription Aw
</span></span>4)
intel Core i3-550, AMD Phenom II X4 955 или аналоги;
4 ГБ ОЗУ;
NVIDIA GeForce GTX 460 (1 ГБ VRAM), AMD Radeon HD 5770 (1 ГБ VRAM) или аналоги;
<span>20 ГБ места на жестком диске.
</span>Цены найдешь на сайте
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
var
i, n: integer;
p: BigInteger;
begin
write('Введите число N ');
readln(n);
p := 1;
for i := 1 to n do p := p * i;
writeln( 'Произведение чисел от 1 до ',n,' равно : ',p);
end.
Тест №1:
Введите число N 5
Произведение чисел от 1 до 5 равно : 120
Тест №2:
Введите число N 100
Произведение чисел от 1 до 100 равно : 93326215443944152681699238856266700490715968264381621468592963895217599993229915608941463976156518286253697920827223758251185210916864000000000000000000000000
Ssh-криптографический протокол,более безопасен и широко используется
