Дан фрагмент таблицы «Зарплата сотрудников». A B 1 Фамилия Зарплата, руб. 2 Иванов 10676 3 Петров 13696,24 - id1277844920201123 от alieksandra10981 23.11.2020 12:44

Question

Информатика: Дан фрагмент таблицы «Зарплата сотрудников». A B 1 Фамилия Зарплата, руб. 2 Иванов 10676 3 Петров 13696,24 4 Кошкина 5735 5 Владимирова 16387,82 6 Поляков 30019 7 Николаев 12622 8 Короленко 13115 В программе MS Excel использована функция MIN. И записана следующим образом: =MIN(B2:B8) Полученный ответ: . В программе MS Excel использована функция MAX. И записана следующим образом: =MAX(B2:B8) Полученный ответ: .

alieksandra10981 · Accepted Answer

1. 10
2. 12
3. 3
4. 22
5. 15
6. 34
7. 3
Часть 2
1.
Var
n:integer;
Begin
Write('Введи число ');
Readln(n);
if (n mod 2) = 0 then write(n,' чётное) else write(n,' нечётное);
End.
2.
Var
a,b:integer;
Begin
Write('Введи числа ');
Readln(a,b);
if a>b then Begin Write('a = ',b*a,' b = ',a+b) else write('a = ',a+b,' b = ',a*b);
End.
3.
Var
n:integer;
Begin
write('Введи двузначное число ');
Readln(n);
if ((n div 10) = 6) or ((n mod 10) = 6) then write('6 присутствует') else write('6 нет в этом числе');
End.

MOGZ ответил