Задать вопрос
26 июня, 23:47

Даны 3 числа a, b, c. Определить минимальное из них. Если минимальное число окажется отрицательным, то определить количество отрицательных чисел, а иначе все положительные числа заменить на отрицательные.

Написать программу и блок схему

+3
Ответы (1)
  1. 27 июня, 00:25
    0
    Program project1;

    uses

    crt, math;

    var s:real; i, j, f:real; a:integer;

    begin

    writeln ('vvedite 1 chislo ') ; readln (i) ;

    writeln ('vvedite 2 chislo ') ; readln (j) ;

    writeln ('vvedite 3 chislo ') ; readln (f) ;

    s:=i;

    if j
    if f
    if s<0 then

    begin

    if i<0 then inc (a) ;

    if j<0 then inc (a) ;

    if f<0 then inc (a) ;

    writeln ('kolichestvo otricatelnix ', a:2) ;

    end

    else

    begin

    if i>0 then i:=i*-1;

    if j>0 then j:=i*-1;

    if f>0 then f:=i*-1;

    end;

    writeln ('min chislo ', s:2:0) ;

    readln;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Даны 3 числа a, b, c. Определить минимальное из них. Если минимальное число окажется отрицательным, то определить количество отрицательных ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
1) Вычислить длину окружности и площадь круга одного и того же заданного радиуса R. Pascal (желательно с блок-схемой) 2) Найти сумму членов арифметической прогрессии, если известны её первый член, знаменатель и число членов прогрессии Pascal
Ответы (1)
Помогите исправить ошибки и написать блок-схему. Задание: Имеется массив А из N произвольных чисел, среди которых есть положительные, отрицательные и равные нулю.
Ответы (1)
Определить среди 3 введенных чисел (a, b, c) количество отрицательных и положительных. Если больше положительных, то найти минимум из этих 3 чисел, а иначе найти максимум. (нужно нарисовать блок схему и написать программу в паскале)
Ответы (1)
Написать программу на Pascal, либо C + + и составить блок-схему Даны натуральные числа A1, A2 ... Признак конца последовательности 99. Найти количество положительных чисел и удвоенное количество отрицательных чисел.
Ответы (1)
1. Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 4. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 4.
Ответы (1)