yana3657
26.12.2022 03:26

с тестом по информатике.
1. Алгоритмы, которые решают некоторую подзадачу главной задачи и, как правило, выполняются многократно, называются
A) циклическими; D) основными;
B) вс Е) ветвящимися.
C) линейными;
К заданиям 18—20
Имеется исполнитель Кузнечик, который живет на числовой оси.
Система команд Кузнечика:
вперед — прыжок по числовой оси на N единиц вперед;
назад — прыжок по числовой оси на N единиц назад.
2.Кузнечик выполнил программу из 50 команд, в которой команд назад на 2 на 10 больше, чем команд
вперед 3 (других команд нет). На сколько единиц и в какую сторону сместился Кузнечик?
A) на 30 единиц назад;
B) на 20 единиц вперед;
C) на 30 единиц вперед;
D) вернулся в исходное положение;
E) такой программы не может быть.
3. Стартовав из точки 0 и выполнив некоторую программу, Кузнечик побывал последовательно в точках:
0; 3; 1; 4; 2; 0; -2. В каких точках побывает Кузнечик, выполняя эту же программу, стартовав из точки —5?
A) 5; 8; 6; 9; 7; 5; 3;
B) 5; 8; 6; 9; 7; 5; -3;
C) -5; -2; -4; -1; -3; -5; -7;
D) -5; -2; -4; -1; -3; -5; -3;
Е) -6; -3; -5; -2; -4; -6; -8.
4. Выбрать фрагмент программы на алгоритмическом языке, соответствующий блок-схеме:
A) если Yl то если Y2 то SI все иначе S2 все
B) если Yl то если Y2 то S1 все все S2
С) если Y1 то если Y2 ТО S1 иначе S2 все все
D) если Y1 то S1 иначе если Y2 то S1 все все
E) если Y1 то повторять нц S2 если Y2 то S1 все кц
5. Для блок-схемы из во выбрать условие, при котором будет выполняться команда S1.
A) (Y1=истина) и (Y2=истина);
B) Y1=ложь;
C) (Y1=истина) или (Y2=ложь);
D) (Y1=истина) и (Y2=ложь);
E) Y1=истина.
6. Выберите последовательность команд, меняющих местами две величины X и У (X < > У).
А) Х:=У; У:=Х; D)A:=X; X:=Y; Y:=A;
B)Х:=А; X:=Y; A:=Y; Е) Х:=А; Y:=X; A:=Y.
C) Х:=У;
7. Чему будут равны значения переменных S и I после выполнения алгоритма?
S:=0; /:=5; пока I>0 повторять S:=S+I; I:=I-1 кц
A)S=0,I=-1; C)S=15, I=5; Е) S=15, I=0.
B)S=5, I=0; D)S=0, I=5;
8. Чему будут равны значения переменных S и I после выполнения алгоритма:
S:=0;
I:=-3;
пока I<2 повторять
нц если I<0 то A:=I*I иначе A:= I-1 все
S:=S+A; I:=I+1 кц
A) S=l, I=1; C)S=14, I=2; E)S=13, I=1.
B)S=13, I=2; D)S=2, I=2;
9. Выбрать фрагмент алгоритма, позволяющий найти
максимальное из трех чисел X, Y, Z.
A) если X>Y то В:=Х все B:=Y если BB) если X>Y то В:=Х иначе B:=Y все если B>Z то B:=Z все
C) если X>Y то В:=Х если BD)если X>Y то В:=Х иначе B:=Y кв если BE) если Х>У то В:=Х иначе если B10. Выбрать фрагмент программы на Паскале, в котором переменной Y присваивается значение, равное
0, если -5<Х<5. В противном случае переменной Y
присваивается значение, равное 1.
A) if х>-5 then if х<5 then у:=0; у:=1;
B) if х>-5 then if х<5 then у:=0 else у:=1;
C) if х<-5 then if х>5 then у:=1 else у:=0;
D) у:=1; if х>-5 then if х<5 then у:=0;
E)if х>-5 then у:=0 else у: =1; if х<5 then у: = 1.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Ali0429
11.03.2023 17:16
У меня получилось вот что (смотри скриншоты листинга программы и результата работы этой программы):
uses Crt;
const n = 10;
var A: array [1..n] of integer; 
        i: integer;
begin 
ClrScr; 
Randomize; 
WriteLn ( ' Massiv I: '); 
for i:=1 to n do 
    begin     
          A[i] := 1+random(n);  
          Write (A[i]:4); 
    end; 
WriteLn; WriteLn ( ' Massiv II: '); 
for i:=1 to n do 
    begin   
           if (A[i] mod 2 =0) then A[i]:=0 else A[i]:=3*A[i];     
           Write (A[i]:4); 
   end;
ReadLn;
end.     
Составьте программу, которая запол няет массив a [1..10] случайными целыми числа ми в диапазоне от 1
Составьте программу, которая запол няет массив a [1..10] случайными целыми числа ми в диапазоне от 1
0,0(0 оценок)
Ответ:
miksboy
26.05.2022 11:07
Program q1;
uses crt;
const n=10;
var i,j:integer;
mass:array [1..n] of integer;
countNum:integer; // переменная для хранения количества нечетных чисел
proizv:integer; // переменная для хранения произведения нечетных чисел
BEGIN
proizv:=1; // так как, изначально равно 0, а при умножении на 0 будет всегда 0
{создание последовательности n целых чисел}
Writeln('Случайные целые числа: ');
for i:=1 to n do
begin
mass[ i ]:=random(9)+1; //присваеваем переменной случайное значение от 1 до 10
write(inttostr(mass[ i ])+', ');
end;
{Вычисление произведения и количества нечетных чисел}
for i:=1 to n do
if mass[ i ] mod 2 <> 0 then //проверяем не четное-ли число, если да, то.. .
begin
inc(countNum); //увеличиваем на один кол-во нечетных чисел
proizv:=proizv*mass[ i ]; // высчитываем произведение
end;
{Вывод результатов}
writeln;
writeln('Всего нечетных чисел: '+inttostr(countNum));
writeln('Их произведение: '+inttostr(proizv));
END.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота