Регистрация
Chernysh14
17.12.2022 04:05
Информатика
Есть ответ 👍

Информатика.хелп. нужно. заранее)

178
461
Посмотреть ответы 2

Ответы на вопрос:

лааллввлллаалв
лааллввлллаалв
4,4(67 оценок)

1 - не сделаю. тк нет 121

ответ:

номер 2.

          ----- 10,2         10,8     -10,2       -10,8

round(x) 10             11           -10           -11

int(x)         10           10           -10         -10

frac(x)       2             8             2             8

3.

program s;

var a, b: real;

begin

    write('a: ');

    readln(a);

    write('b: ');

    readln(b);

   

    writeln(a*b);

end.

4. думаю сам )

объяснение:

2. думаю в объяснении не нуждается. в и так написано, что

3. создали переменные, запросили значения, вывели произведение.

di611
di611
4,5(65 оценок)

// PascalABC.NET

begin

 var a, b, c, d, e, f, g, h, i, j, k: integer;

 Read(a, b, c, d, e, f, g, h);

 k := Max(e - 170, 0);

 e -= k;

 j := Max(e - 168, 0);

 i := e - j;

 Write(c * (a + b) * (1 + Sqrt(Sqrt(d))) / 168 *

     (i + 1.5 * j + 2 * k) - f + 1.1 * (g + h):0:6)

end.

Популярно: Информатика