Дайте несколько возможных общих имён каждой группе объектов.Выберите из них самое подходящее.ответ обоснуйте;а)Буратино,Мальвина,Пьеро,Артемон;б)12 месяцев,Морозко,золушка,синяя борода;в)бишкек,Ош,Каракол;г)Ак-бура,Кокомерен,Кара-Дарыя,Бишкек;д)Бишкек,Ош,Нарын. 9.Назовите для каждого из приведенных действий два предмета,с которыми указанное действие человек выполняет по разному:а)собрать;б)заполнить;в) открыть;г)связать;д)включить;е)сложить;ж)измерить;з)поймать. 13.Дайте наиболее точное общее имя каждой группе объектов:а)Кыргызстан,Казахстан,Россия;б)Кыргызстан, Узбекистан,Таджикистан;в)Каракол,Ош,Нарын;г)Каракол ,Чолпон Ата,балыкчы;д)Ыссык куль,Байкал, Балхаш;е)Ыссык куль,сон куль,сатып куль;ж)принтер,монитор,клавиатура;з)клавиатура,сканер,мышь;и)тополь,облепиха,тюльпан;к)яблоня,груша,вишня.
// Внимание! Если программа не работает, обновите версию!
begin
var a,b,h:real;
Write('Введите начальное значение, конечное и шаг: ');
Read(a,b,h);
var n:=Trunc((b-a)/h)+1;
for var i:=1 to n do begin
var x:=a+(i-1)*h;
var y:=(x>0) and (x<=2)?x*x+Cos(x):4/x;
Writeln(x:0:3,' ',y:0:5)
end
end.
Пример
Введите начальное значение, конечное и шаг: -2.5 1.6 0.2
-2.500 -1.60000
-2.300 -1.73913
-2.100 -1.90476
-1.900 -2.10526
-1.700 -2.35294
-1.500 -2.66667
-1.300 -3.07692
-1.100 -3.63636
-0.900 -4.44444
-0.700 -5.71429
-0.500 -8.00000
-0.300 -13.33333
-0.100 -40.00000
0.100 1.00500
0.300 1.04534
0.500 1.12758
0.700 1.25484
0.900 1.43161
1.100 1.66360
1.300 1.95750
1.500 2.32074
program t1;
var
a: array[1..6] of integer;
i, m, mi: integer;
begin
writeln('ввод массива');
for i := 1 to 6 do
readln(a[i]);
mi := 1;
m := a[mi];
for i := 2 to 6 do
if a[i] < m then
begin
mi := i;
m := a[mi];
end;
writeln('минимум: ', m, ' (a[', mi, '])');
end.
2) предполагая, что 'коробочка' - это корень
program t2;
const
F = -8;
T = 6;
S = 2;
var
i: real;
function GetY(x: real): real;
begin
if (x > -3) and (x <= 3) then
GetY := sqrt(x)
else
GetY := 1 / (x * x);
end;
begin
writeln('промежуток [', F, '; ', T, '], шаг ', S, ':');
i := F;
while i <= T do
begin
writeln('y(', i, ') = ', GetY(i));
i := i + S;
end;
end.