<h3>PascalABC.NET 3.4.2, сборка 1857 от 05.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(10, 20, 30);
a.Println;
var p := 1;
foreach var t in a do
if t = 25 then p *= 25;
if p = 1 then p := 0;
p.Println;
end.
<h2>24 27 25 24 27 21 27 25 26 25</h2><h2>15625 </h2>
#include <stdio.h>
int main()
{
int a,b,e,d;
a=192345; //Число
e=5; //Номер цифры
int c[1000000];
d=0;
while(a>0)
{
b=a%10;
d++;
c[d]=b;
a/=10;
}
for(int i=d;i>0;i--){
if((d-i+1)==e)printf("Цифра %d\n",c[i]); //Вывод искомой цифры
}
return 0;
}
Флешка cd-диск и delev
различия флешка меньше чем cd-диск
delev больше чем cd-диск и флешка
Var s:integer;
begin
s:=2*3+4*4*4*4*4;
writeln('s = ',s);
end.
Результат:
<span>s = 1030</span>
1)Основные составляющие персонального компьюетра: системный блок и устройства ввода-вывода информации. К устройствам ввода-вывода информации относятся клавиатура, мышь, монитор, принтер, сканер, видеокамера, динамики и прочие подобные устройства.Системный блок состоит из обязательных устройств: материнская плата, жесткий диск, процессор, оперативная память, блок питания, видеокарта, системный динамик. К необязательным составляющим системного блока можно отнести звуковую карту, сетевую карту, floppy, CD и DWD-приводы, картридеры и прочие навороты.