Задать вопрос
9 июля, 17:53

Представлен фрагмент программы, написанный на языке

Pascal.

...

i : = 1;

for j:=2 to N do if arr[i] > arr[j] then i : = j;

writeln ('element ', arr[i]) ;

end.

Какая поговорка ближе других описывает сущность программного

кода этой программы?

1) За двумя зайцами погонишься - ни одного не поймаешь.

2) Мал золотник, да дорог.

3) Не имей сто рублей, а имей сто друзей.

4) Без труда не выловишь и рыбку из пруда.

+2
Ответы (1)
  1. 9 июля, 19:49
    0
    В представленном фрагменте программы определяется номер минимального элемента массива и выводится элемент с этим номером (т. е. минимальный элемент). ⇒

    2) Мал золотник, да дорог.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Представлен фрагмент программы, написанный на языке Pascal. ... i : = 1; for j:=2 to N do if arr[i] > arr[j] then i : = j; writeln ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
10111 (маленькая) 2 (вроде индекс) в a (мал.) 10 275 (мал.) 8 в a (мал.) 10 1F3 (мал.) 16 в a10 112 (мал.) 10 в a2 94 (мал.) в a8 123 (мал.) 10 в а16 1110011001 (мал.) 2 в а8 251 (мал.) в а2 1111000 (мал.) 2 в а16 IF5 (мал.) в а2
Ответы (1)
Помогите найти ошибку в программе, при запуске на строке "vyvod (arr) ; " выдает ошибку: "Ожидалось выражение". Не пойму в чем проблема. uses crt; type arr=array [1 ...
Ответы (1)
Как сделать теперь без массива (паскале) ? var nm:array of integer; j, l:integer; begin nm: = new integer[3] (random (20), random (20), random (20)) ; writeln ('nm[0] = ', nm[0]) ; writeln ('nm[1] = ', nm[1]) ; writeln ('nm[2] = ', nm[2]) ;
Ответы (1)
Имеется условный оператор:if D10 then writeln ('ура!') else writeln ('плохо ...') ; Какими операторами его можно заменить? Выберите несколько из 4 вариантов ответа: 1) if D=10 then writeln ('ура!') else writeln ('плохо ...
Ответы (1)
Выдаёт ошибку: операнды имеют неприводимые типы. Где я ошиблась? (Программа написана на языке Pascal ABC) Program Home; Uses CRT; Var a: integer; b: real; Begin WriteLn ('Введите еденицу измереня: килограмм, миллиграмм, грамм, тонна, центнер') ;
Ответы (1)