Информатика: Закрасьте круги эйлера по заданию ( 7 класс)

Закрасьте круги эйлера по заданию ( 7 класс)

👇

Открыть все ответы

Ответ:

dobrotina90

21.09.2020

1):С:\Учебный\Информатика\Кодирование ->
С:\Учебный\Информатика ->
  С:\Учебный ->
  С:\Учебный\Информатика ->
  С:\Учебный\Информатика\Кодирование ->
  С:\Учебный\Информатика ->
  С:\Учебный ->
Не подходит, т.к. Витя опустился на n уровней, а поднялся на  n+2, что не подходит по условию.
2)С:\Учебный\Информатика\Кодирование ->
С:\Учебный\Информатика ->
С:\Учебный ->
С:\Учебный\Информатика ->
С:\Учебный\Информатика\Программирование->
С:\Учебный\Информатика\Программирование\Паскаль
Не подходит, т.к. Витя спустился на либо на 2 уровня вниз, либо на 3, а поднялся либо на 3, либо на 4 уровня вверх, что не подходит по условию.
3)С:\Учебный\Информатика\Кодирование ->
С:\Учебный\Информатика ->
С:\Учебный ->
С:\Учебный\Математика ->
С:\Учебный\Математика\Дроби
Подходит. Витя опустился на 2 уровня вниз и поднялся на 2 уровня вверх.
4)С:\Учебный\Информатика\Кодирование ->
С:\Учебный\Информатика ->
С:\Учебный ->
С:\ ->
С:\Учебный\ ->
С:\Учебный\Информатика
Не подходит, т.к. Витя спустился на 3 уровня вниз, а поднялся на 2, что не подходит по условию.
ответ: 3)

4,5(85 оценок)

Ответ:

strongbaltaevowj0hz

21.09.2020

6)
const n=10;
var a: array[1..n] of integer;
i,max,min : integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
a[i]:=random(21);
write(a[i]:3);
end;
writeln;
max:=a[1]; min:=a[1];
for i:=2 to n do
begin
if a[i] > max then max:=a[i];
if a[i] < min then min:=a[i];
end;
writeln('L = ',max-min);
end.

Пример:
Исходный массив:
10 8 8 6 4 16 18 10 11 13
L = 14

9)
const n=10;
var a: array[1..n] of real;
i,k1,k2 : integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
a[i]:=10*random-5;
write(a[i]:5:2);
end;
writeln;
k1:=0; k2:=0;
for i:=1 to n do
if a[i]>0 then k1:=k1+1
else if a[i]<0 then k2:=k2+1;
writeln('Положительных: ',k1,', отрицательных: ',k2,' нулевых: ',n-k1-k2);
end.

Пример:
Исходный массив:
-1.03 2.79-3.60 0.33-3.69-4.69-2.34-4.19 1.20 1.74
Положительных: 4, отрицательных: 6 нулевых: 0

16)
const n=10;
var a: array[1..n] of real;
i : integer;
begin
for i:=1 to n div 2 do begin
a[i]:=i;
a[n div 2+i]:=sin(a[i]);
end;
for i:=1 to n div 2 do
writeln(a[i]:4:1,a[n div 2+i]:6:2);
end.

Пример:
1.0 0.84
2.0 0.91
3.0 0.14
4.0 -0.76
5.0 -0.96

19)
const n=10;
var a: array[1..n] of integer;
i: integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
a[i]:=random(51);
write(a[i]:5);
end;
writeln;
writeln('Выбранные элементы:');
i:=1;
while i<=n do
begin
write(a[i],' ');
i:=2*i;
end;
end.

Пример:
Исходный массив:
8 38 22 45 36 23 21 13 5 13
Выбранные элементы:
8 38 45 13

4,7(72 оценок)

Это интересно:

Стиль-и-уход-за-собой

26.01.2020

Как купаться при нехватке воды: простые советы...

Компьютеры-и-электроника

05.02.2021

5 простых шагов, как добавить проигрыватель к стереосистеме...

Здоровье

26.08.2020

Как начать заниматься бикрам йогой...

Семейная-жизнь