В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
gbvf1
gbvf1
01.08.2020 02:15 •  Информатика

Я не понимаю как это сделать! Что значит вывести квадрат из чисел в паскале
1) "вертикальной разверткой"
2) "горизонтальной разверткой"
3) "змейкой"
Напишите пример

Показать ответ
Ответ:
настя7096
настя7096
30.04.2023 13:14

1:

program prog;

var i,n,s,a:integer;

var chk:boolean;

begin

   chk:=False;

   s:=1;

   write('Введите количество вводимых чисел: '); readln(n);

   for i:=1 to n do

   begin

       write('Введите ', i, '-е число: '); readln(a);

       if i mod 2 = 0 then

       begin

           s:=s*a;

           chk:=True;

       end;

   end;

   if chk = False then s:=0;

   write('Произведение чётных членов введённой последовательности равно ', s);

end.

2:

program fib;

var

   F1,F2,n,i :Integer;

begin

   write('Введите количество чисел Фибоначчи: '); readln(n);

   F1:=1;

   F2:=1;

   For i:=1 to n do

   begin

       if i>2 then

       begin

           F1:=F1+F2;

           F2:=F1-F2;

       end;

       write(F1, ' ');

   end;

end.

0,0(0 оценок)
Ответ:
KseniyaTyan2018
KseniyaTyan2018
19.08.2021 12:48

Объяснение:

Какие служебные слова применяются для записи цикла с постусловием

Выберите несколько из 4 вариантов ответа:

1) End 3) Repeat

2) Until 4) Begin

Задание 2

Вопрос:

Как найти элемент массива с определенным значением?

Выберите один из 3 вариантов ответа:

1) Отсортировать массив и выбрать максимальный индекс.

2) Перебирать элементы массива пока они не закончатся или пока не будет найден искомый.

3) Выбрать один элемент массива, предположить его искомым и сравнить с оставшимися, меняя в процессе предполагаемый искомый элемент.

Задание 3

Вопрос:

Установите верный порядок следования команд при поиске в массиве из 50 элементов, элемента равного k

Укажите порядок следования всех 4 вариантов ответа:

_1_ if a[i]=k then writeln (i); _2_ while (a[i]<>k) and (i<50) do

_1_ i:=1; __ i:=i+1;

Задание 4

Вопрос:

Какая команда пропущена в данном участке программы, отвечающем за поиск максимального элемента массива. Запишите команду без пробелов.

r:=1;

for i:=2 to n do

if a[i]>a[r]

then ...

Запишите ответ:

Задание 5

Вопрос:

Запишите без пробелов команду, которая пропущена в данном алгоритме сортировки массива по убыванию методом пузырька.

p:=false;

while p=false do

begin

...

for i:=1 to n-1 do

if a[i] then begin

p:=a[i];

a[i]:=a[i+1];

a[i+1]:=p;

end;

end;

Запишите ответ:

Задание 6

Вопрос:

Какое служебное слово пропущено в данной записи цикла с постусловием?

repeat

i:=i-1;

... i=0;

Запишите ответ:until

Задание 7

Вопрос:

Как называется описанный метод сортировки по возрастанию?

Проходя по массиву, ищем два соседних элемента, которые расположены не по возрастанию. Найдя такие элементы, меняем их местами. Продолжаем до тех пор, пока за весь проход по массиву не будет сделано ни одной перестановки.

Выберите один из 4 вариантов ответа:

1) Метод перебора

2) Метод пузырька

3) Метод выбора

4) Метод последовательных перестановок

Задание 8

Вопрос:

Что такое сортировка?

Выберите один из 3 вариантов ответа:

1) Изменение индексов элементов массива

2) Изменение порядка следования элементов в массиве в соответствии с определенным признаком

3) Изменение значений элементов массива

Задание 9

Вопрос:

Какие существуют типы задач на поиск элементов в массиве?

Выберите несколько из 4 вариантов ответа:

1) Удаление элемента массива

2) Найти элемент с указанным значением

3) Добавление элемента

4) Найти максимальный или минимальный элемент

Задание 10

Вопрос:

Установите верный порядок следования команд при сортировке массива из 10 элементов по возрастанию методом выбора.

Укажите порядок следования всех 7 вариантов ответа:

__ a[i]:=a[j];

__ for i:=j+1 to 10 do

__ a[j]:=p;

__ p:=a[i];

__ if a[j] __ for j:=1 to 9 do

__ end;

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота