Задать вопрос
12 ноября, 14:52

1. Вычислить значения функции

y={x2 + 5, при x>3

x-8, при x< = 3

2. Написать фрагмент программ, подсчитывающий сумму только положительных из трех данных чисел

+5
Ответы (1)
  1. 12 ноября, 15:20
    0
    1)

    var

    x:integer;

    y:real;

    begin

    write ('x=') ;

    readln (x) ;

    if x>3 then y: = (x*2+5) ;

    if x<=3 then y:=x-8;

    writeln ('y=', y) ;

    end.

    2)

    var s, a, b, c:real;

    begin

    writeln ('vvedite a, b, c') ;

    readln (a, b, c) ;

    s:=0;

    if a>0 then s:=s+a;

    if b>0 then s:=s+b;

    if c>0 then s:=s+c;

    write (s) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «1. Вычислить значения функции y={x2 + 5, при x>3 x-8, при x< = 3 2. Написать фрагмент программ, подсчитывающий сумму только положительных ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы