#1
var
A : array [1..21] of integer;
min : integer := 32766;
begin
for var i:=1 to 21 do
readln(A[i]);
for var i:=1 to 21 do
if (A[i] < min) then
min := A[i];
writeln(min);
end.
#2
var
Y : array [1..25] of integer;
isthefirst : boolean := false;
last : integer := 0;
begin
for var i:=1 to 25 do
readln(Y[i]);
for var i:=1 to 25 do
if (Y[i] < 0) and (isthefirst = false) then
begin
writeln(i);
isthefirst := true;
break;
end;
for var i:=2 to 25 do
begin
if (i = 25) then
begin
if (Y[i] < 0) and (last = 0) then
last := i;
break;
end;
if ((Y[i+1] > 0) and (Y[i] < 0)) then
last := i;
end;
if (isthefirst) and (last = 0) then
last := 1;
if (last <> 0) then
writeln(last) else
writeln('There''no numbers');
end.
//Не бейте за кастыли Мне лень думать)))000
#2
type TIntMassiv = array of Integer; //Дин. Массив (Более гибок в работе)
var
n : integer;
sum : integer := 0;
counter : integer := 0;
var A: TIntMassiv;
begin
readln (n);
SetLength(A, n);
for var i:=0 to n-1 do
begin
readln(A[i]);
if (A[i] > 0) and (A[i] mod 2 = 0) then
begin
sum += A[i];
counter += 1;
end;
end;
if (sum = 0) or (counter = 0) then
begin
writeln('There''re no numbers');
exit;
end;
writeln(sum/counter);
end.
Пернетақта пернелері атқаратын қызметіне қатысты келесідей топтарға бөлінеді:
• Енгізу пернелері(алфабиттік-цифрлық) - мұнда қарапайым баспа машинасында болатын пернелер жинақталады, яғни әріптік, сандық және символдық пернелер.
• Басқару пернелері – бұл пернелер жеке түрінде немесе басқа пернелермен бірге басыла отырып нақты әрекеттерді орындайды. Көбінесе CTRL, ALT, Windows белгісі бар перне и ESC қолданылады..
• Функционалдық пернелер – арнайы тапсырмаларды орындау үшін қолданылады. Олар F1, F2, F3 және ары қарай F12 дейінгі пернелер тізбегінен тұрады. Түрлі бағдарламаларға қатысты бұл пернелердің қызметтері әр түрлі болып келеді.
• Орын ауыстыру пернелері - бұл пернелер құжаттарда, веб-беттерде және тексті түзетуде орын ауыстыру үшін қолданылады. Оларға бағыттауыш пернелер,сондай-ақ, HOME, END, PAGE UP, PAGE DOWN, DELETE және INSERT пернелері жатады.
• Сандық пернетақта – бұл пернетақта сандарды тез енгізу үшін өте ыңғайлы. Ондағы пернелер қарапайым калькулятор немесе есептеу машинасына сәйкес топталып жинақталған.
Енгізу пернелері
Деректерді енгізу пернелеріне негізгі алфабиттік-цифрлық және символдық пернелер еніп, сондай-ақ төмендегідей пернелерді қамтиды:
SHIFT - Бас әріптерді енгізу үшін қолданылады
CAPS LOCK - Бір рет басу арқылы бас әріптерді енгізу режиміне көшеміз, ал екінші рет басқан кезде ол қасиеті өшіріледі. Бұл перненің қосып/өшірілуі пернетақтада түстік индикатормен көрсетілуі мүмкін.
TAB - Курсорды бірнеше бос орынға(абзац) жылжыту үшін қолданылады.
ENTER - Жаңа жолға өту үшін қолданады.Сұқбаттық терезелерде белгіленген батырманы таңдау үшін қолданылады.
БОС ОРЫН - Курсорды бір бос орынға жылжыту үшін қолданады..
BACKSPACE - Курсордың алдындағы символды немесе белгіленген тексті өшіру үшін қолданады.
Объяснение:
1.
a)2 => 13
2*3=6
6*3=18
18-1=17
17-1=16
16-1=15
15-1=14
14-1=13
ответ: 2211111
б) 5=>26
5-1=4
4-1=3
3*3=9
9*3=27
27-1=26
ответ: 11221
2.
8
22212
82
822
8222
8222/2=4111
41112
ответ: 41112
1=>16
12
12/2=6
6/2=3
32
32/2=16
ответ: 12212