Информатика
Какой набор гаджетов наиболее подходит для сборки робота, обладающего слухом, зрением и возможностью общаться посредством голоса? А) web-камера, микрофон, динамики Б) микрофон, экран,web-камера В) wi-fi-роутер, гусеницы,микрофон Г)навигатор, экран,динамики
Помогите сделать подпрограмму с помощью процедуры!!! пожалуйста!!!const CSize1=7; CSize2=6; CSize3=5;type TMas1=array[1..CSize1,1..CSize1] of integer; TMas2=array[1..Csize2, 1..CSize2] of integer; TMas3=array[1..Csize3, 1..CSize3] of integer;var A1:TMas1; A2:TMas2; A3:TMas3; i,j,x, y:byte;function zero(i:integer):boolean;beginzero:=false;if i=0 then zero:=true;end;function interval(i:integer):boolean;begininterval:=false;if (i=1) then interval:=true;end;beginX:=0;Y:=0;randomize;for i:=1 to CSize1 do begin for j:=1 to CSize1 do begin A1[i, j]:=random(50); write(A1[i, j]:3); if zero(A1[i, j]) then inc(x); if interval(A1[i,j]) then inc(y); end; writeln; end;writeln(Kol-vo 0 =, x);writeln(Kol-vo v intervale=, y);writeln;x:=0;y:=0;for i:=1 to CSize2 do begin for j:=1 to CSize2 do begin A2[i, j]:=random(50); write(A2[i,j]:3); if zero(A1[i,j]) then inc(x); if interval(A2[i,j]) then inc(y); end; writeln; end;writeln(Kol-vo 0 =, x);writeln(Kol-vo v intervale=, y);writeln;x:=0;y:=0;for i:=1 to CSize3 do begin for j:=1 to CSize3 do begin A3[i, j]:=random(50); write(A3[i,j]:3); if zero(A3[i,j]) then inc(x); if interval(A3[i,j]) then inc(y); end; writeln; end;writeln(Kol-vo 0 =, x);writeln(Kol-vo v intervale=, y);writeln;x:=0;y:=0;end.
№1 Семенова Анастасия 1. Закодировать свои имя и фамилию следующим образом: А = 1, Б = 2, В = 3, ….. , Ю = 32, Я = 33. 2. Найти сумму ГЛАСНЫХ букв своей фамилии. 3. Найти сумму СОГЛАСНЫХ букв своего имени. 4. Перевести сумму букв фамилии ИЗ ДЕСЯТИЧНОЙ СС В ДЕВЯТИРИЧНУЮ СС5. Перевести сумму букв имени ИЗ ДЕСЯТИЧНОЙ СС В ДВЕНАДЦАТИРИЧНУЮ СС. 6. Найти сумму букв своей фамилии по алгоритму от 22.04.2013г.7. Возвести в степень 3/2 полученное число.8. Целую часть полученного десятичного числа перевести последовательно в 2-ную, 3-ную, 7-ную, 12-ную и 16-ную системы счисления. 9. Сделать вывод на основе полученых результатов. №2На языке программирования Паскаль составить программу перевода из десятичной системы счисления в систему счисления с основанием Х, где Х - целое число, определяемое по такому правилу: если 2-я буква фамилии учащегося находится в интервале от А до Д, то Х = 9; если 2-я буква фамилии учащегося находится в интервале от Е до К, то Х = 8;если 2-я буква фамилии учащегося находится в интервале от Л до Р, то Х = 7;если 2-я буква фамилии учащегося находится в интервале от С до Ц, то Х = 6;если 2-я буква фамилии учащегося находится в интервале от Ч до Я, то Х = 5.
