дина372
27.02.2021 15:51

? воПРОСЫ И ЗАДАНИЯ E
1. Являются ли высказываниями следующие предложения?
а) Радуга синего цвета.
б) Мойте руки перед едой!
в) На каком дереве сидит ворона после дождя?
г) Осенью дни становятся короче.
д) Земля квадратная.
2. Определите, какие из высказываний являются истинными:
а) Клавиатура - это устройство для вывода информации.
б) Все геометрические фигуры имеют углы.
в) 10 делится на 3 без остатка.
г) Луна
спутник Земли.
3. Сделайте умозаключение:
а) Все планеты вращаются вокруг своей оси, Марс - это плане-
та, значит...
б) Все квадраты - это прямоугольники, у прямоугольника четыре
угла, значит, у квадрата...
4. Приведите примеры суждений, в которых говорится об объектах,
изучаемых на уроках:
а) информатики; б) истории; в) математики.​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Luna28u
07.12.2021 22:11
 const nx = 20;
var x: array[1..nx, 1..nx] of integer;z:array[1..nx*2] of integer; 
i, j, k,n,r,t: integer; 
begin 
Writeln('Введите размер матрицы n');Read(n); 
 for i := 1 to n do begin   
for j := 1 to n do begin   
Read(k);x[i, j] := k;  end;end;   
Writeln('Исходный массив'); 
for i := 1 to n do begin   
for j := 1 to n do begin     
Write(x[i, j]:4);     
if x[i, j]>0 then begin t:=t+1; z[t]:=x[i, j];end;    
end;   
Writeln;  end; 
Writeln;Writeln('Одномерный массив'); 
for j := 1 to t do     
Write(z[j]:4); 
 end.
0,0(0 оценок)
Ответ:
Arina8411
05.03.2023 05:45
// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
  var n:=ReadInteger('Количество элементов в массиве: ');
  var a:=ArrRandom(n,-50,50);
  a.Println(',');
  Writeln('Четные элементы: ');
  var i:=1;
  while i<n do begin Write(a[i],' '); Inc(i,2) end;
  Writeln;
  Writeln('Нечетные элементы: ');
  i:=0;
  while i<n-1 do begin Write(a[i],' '); Inc(i,2) end;
  Writeln
end.

Тестовое решение:
Количество элементов в массиве:  10
15,-18,-29,-25,46,21,-8,-17,-9,15
Четные элементы:
-18 -25 21 -17 15
Нечетные элементы:
15 -29 46 -8 -9
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота