Задать вопрос
14 марта, 12:37

Нужно сделать в паскале

На столе лежит кучка монет.

В этой кучке ровно N монет, каждая из которых имеет стоимость A[i].

Можно выбрать только 3 монеты из кучки. Ваша задача определить максимальную сумму, которую можно набрать?

Формат ввода: В первой строке находится число N - количество монет в кучке. Далее следует N целых чисел A[i] - стоимость i-той монеты.

0 < = A[i] < = 10

3 < = N < = 10

Формат вывода: Одно число - ответ на задачу.

+1
Ответы (1)
  1. 14 марта, 16:25
    0
    Программа написана на языке Паскаль.

    uses crt;

    var

    m, n, t, i : integer;

    a : array [1 ... 10] of integer;

    max : array [1 ... 10] of integer;

    begin

    clrscr;

    m : = - 100;

    write ('N = ') ; readln (n) ;

    for i: = 1 to n do

    read (a[i]) ;

    for i: = 1 to n do

    if a[i]>=m then begin

    max[1]: = a[i]; m:=max[1]; end;

    for i: = 1 to n do if t1 then

    if a[i]=max[1] then begin a[i]:=0; t: = t+1; end;

    m: = - 100;

    for i: = 1 to n do

    if a[i]>=m then

    begin

    max[2]: = a[i]; m:=max[2];

    end;

    t: = 0;

    for i: = 1 to n do

    if t1 then

    if a[i]=max[2] then

    begin a[i]:=0; t: = t+1; end;

    m: = - 100;

    for i: = 1 to n do

    if a[i]>=m then

    begin max[3]: = a[i]; m:=max[3]; end;

    t: = 0;

    for i: = 1 to n do if t1 then

    if a[i]=max[3] then begin

    a[i]:=0; t: = t+1; end;

    m: = - 100;

    writeln;

    for i : = 1 to 3 do

    t: = max[i]+t;

    writeln ('otvet ', t) ;

    readkey;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Нужно сделать в паскале На столе лежит кучка монет. В этой кучке ровно N монет, каждая из которых имеет стоимость A[i]. Можно выбрать ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
У белки было s1 орехов и s2 грибов. Она съела все грибы и s3 орехов. Сколько орехов у неё осталось? Формат ввода: s1 - количество орехов. s2 - количество грибов. s3 - количество съеденных орехов. Формат вывода: d - количество оставшихся орехов.
Ответы (1)
Дано слово. Записать каждый символ по два раза. Формат ввода: s - слово Формат вывода: s1 - новое слово Пример ввода: дождь Пример вывода: ддоожжддьь
Ответы (1)
Напишите программу, которая будет читать любую строку, а затем выводить ее на экран. Формат ввода: s - строка Формат вывода: s - строка Пример ввода: I am a string. Пример вывода: I am a string.
Ответы (1)
Дан массив целых чисел в диапазоне от - 30000 до 30000. Отсортировать его по убыванию. Методом простого выбора. Формат ввода: В первой строке - количество элементов массива не превосходящее 100. На второй строке через пробел элементы массива.
Ответы (1)
На языке питон Даны два целых числа. Программа должна вывести число 1, если первое число больше второго, число 2, если второе больше первого или число 0, если они равны. Формат ввода Вводятся два целых числа. Формат вывода Выведите ответ на задачу.
Ответы (2)