profile
Размещено 5 лет назад по предмету Информатика от misterlukinov

Помогите пожалуйста с задачей.
Из исходного файла in.text в котором находятся 5 чисел найти наибольшее и наименьшее значение. И вывести его в другой текстовый файл в 1 строке минимальный во второй максимальный

  1. Ответ на вопрос
    Ответ на вопрос дан petyaGavrikov
    var a,min,max,i:integer
    t1,t2:text;
    begin
    assign(t1,'in.txt');
    reset(t1);
    read(t1,min);
    max:=min;
    for i:=1 to 4 do
     begin
     read(t1,a);
     if a<min then min:=a;
     if a>max then max:=a;
     end;
    close(t1);
    assign(t2,'out.txt');
    rewrite(t2);
    writeln(t2,min);
    writeln(t2,max);
    close(t2);
    end.

    Пример:
    in.txt:
    5 2 9 7 3

    out.txt:
    2
    9
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.