Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=413668&view=findpost&p=3780842 Wed, 17 Oct 2018 01:38:38 +0000 Задания с олимпиады https://forum.sources.ru/index.php?showtopic=413668&view=findpost&p=3780842
    posled := 0; minim:=1000*1000*1000;
    for k:=1 to N do
    begin
      if X[k]<0 Y := -X[k];
      else Y = X[k];
      if Y-10*(Y/10) = 7 then
        if X[k]<minim then
        begin
          posled := k;
          minim = X[k];
        end;
    end;
    if posled>0 then print minim;
    else print "0";
]]> Славян Pascal https://forum.sources.ru/index.php?showtopic=413668&view=findpost&p=3780827 Tue, 16 Oct 2018 19:03:09 +0000 Задания с олимпиады https://forum.sources.ru/index.php?showtopic=413668&view=findpost&p=3780827 1 ... ХN наименьшего элемента имеющего последнюю цифру 7, а если таких чисел нет, то программа дожна вывести 0.

формат входных данных: -109<Xk<109 и Х не равно 0, k=1..N. Признаком окончания ввода данных является чилос 0.

формат выходных данных: программа выводит наименьший элемент программы оканчивающийся на 7, если таких нет, то выводит 0


2. Напишите программу перевода натурального числа из p-ричной систему в десятичную систему счисления.

формат входных данных: программа получает два числа: P и N , где первое число это основание системы счисления (2меньше или равно P меньше или равно9), ав торое натуральное число в данной системе счисления. кол-во цифр в числе N не превышает шести.

формат выходных данных: программа выводит десятиричное число согласно услоаию задачи


3.Дано натуральное десятичное число N. Напишите программу, которая находит произведение наибольшей и наменьшей цифры данного числа

формат входных данных: программа получает десяточное число N (1меньше или равноNментше или равно109.

формат выходных данных: программа выводит произведение наименьшей и наибольшей цифр данного числа


4. Дана не пустая строка символов, среди которых встречаются цифры. Требуется написать прорамму, которая находит сумму нечетных цифр содержащихся в строке, если их нет, то выводит NO.

формат входных данных: на вход программы поступают символы. Окончанием ввода данных является символ # , после которого строка не обрабатывается, строка на вхоже не больше 1000 символов.

формат выходных данных: программа выводит сумму нечетных цифр выделенных из входной строки, если их нет, то выводит NO]]> Napoleonsha Pascal