Uses
Crt;
Var
i, N, kol: byte;
sum_rost, sr_rost: real;
team: array[1..100] of real;
Begin
sum_rost := 0.0;
sr_rost := 0.0;
kol := 0;
write('Введите количество членов команды');
read(N);
writeln('Введите рост каждого члена команды');
for i := 1 to N do
begin
readln(team[i]);
sum_rost := sum_rost + team[i];
end;
sr_rost := sum_rost / N;
for i := 1 to N do
if (team[i] > sr_rost) then
kol := kol + 1;
writeln('Количество членов команды, рост которых превышает средний по команде (', sr_rost:4:2, ')');
write(' равно ', kol);
End.
Я надеюсь надо было на паскале написать?)
1. Укажите программу для работы с растровыми изображениями.
B. Paint.
2. В файле какого формата хранятся растровые изображения?
А. BMP.
3. В каком формате применяется сжатие?
А. JPG.
4. Формат графического файлы – это:
представления и расположения графических данных на внешнем носителе.
5. Выберите графический формат, в котором могут храниться анимированные изображения.
А. GIF.
Точно не уверенна, но думаю так
Редактор векторной графики Inkscape.
1. Укажите стандартный формат файлов в редакторе Inkscape.
А. Inkscape SVG.
2. Для точной настройки инструментов служит:
B. Панель параметров инструментов.
3. Просмотреть список выполненных действий можно, выполнив команду:
C. Правка→История действий.
4. Какая команда меню открывает диалог «Заливка и обводка»?
C. Объект→ Заливка и обводка.
5. Какую клавишу необходимо удержать нажатой при выборе цвета обводки из Палитры?
C. Shift.