smirnovy
09.03.2022 14:39

1 .В одном из стихотворений Д. Хармса, текст которого приведён в подкаталоге

Хармс, прогремел выстрел. С поисковых средств операционной

системы и текстового редактора выясните, откуда был выстрел.

ответ: .

2 .Сколько файлов с расширением txt содержится в подкаталогах каталога

Поэзия? В ответе укажите только число.

3 .В электронную таблицу занесли результаты анонимного тестирования

студентов. Ниже приведены первые строки получившейся таблицы.

A B C D

1 номер участника пол факультет

2 участник 1 жен. химический 21

3 участник 2 муж. математический 5

4 участник 3 жен. медицинский 15

5 участник 4 муж. математический 15

6 участник 5 муж. экономический 24

В столбце A указан номер участника; в столбце B – пол; в столбце C – один

из четырёх факультетов: математический, медицинский, химический,

экономический; в столбце D – количество набранных (от 5 до 25).

Всего в электронную таблицу были занесены данные по 1000 участникам.

Порядок записей в таблице произвольный.

Выполните задание.

Откройте файл с данной электронной таблицей (расположение файла Вам

сообщат организаторы). На основании данных, содержащихся в этой

таблице, ответьте на два вопроса.

1. Сколько девушек приняли участие в тестировании? ответ на этот

вопрос запишите в ячейку G2 таблицы.

2. Чему равна разница между максимальным и минимальным

у студентов химического факультета? ответ на этот вопрос запишите

в ячейку G3 таблицы.

3. Постройте круговую диаграмму, отображающую соотношение количества

участников химического, математического и медицинского факультетов.

Левый верхний угол диаграммы разместите вблизи ячейки G6.

Полученную таблицу необходимо сохранить под именем, указанным

организаторами.

4 .Напишите программу, которая в последовательности натуральных чисел

вычисляет сумму всех однозначных чисел, кратных 3. Программа получает

на вход натуральные числа, количество введённых чисел неизвестно,

последовательность чисел заканчивается числом 0 (0 – признак окончания

ввода, не входит в последовательность).

Количество чисел не превышает 100. Введённые числа не превышают 300.

Программа должна вывести одно число: сумму всех однозначных чисел,

кратных 3.

Пример работы программы:

Входные данные Выходные данные

6

6

17

18

0

12

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
KrashRoz
29.08.2020 06:07
Ну так как знаю язык программы Dev-C++, напишу и если я не ошибаюсь это массив :-)
#include
main()
{
int i, n;
float s;
printf("n=");
scanf("%d", &n);
int a[n];
for(i=0; i {
printf("\n a[%d]=", i);
scanf("%d", &a[i]);
}
s=0;
for(i=0; i s=s+a[i];
printf("s=%f", s);
puts("Massiv:");
for(i=0; i printf("\n a[%d]=%d", i, a[i]);
getchar();
return(0);
}
напишу краткое объяснение, 1- пишем н, произвольное, это количемтво этих исел будет,
2- создаем массив с и ( параметр массива) меньшим н там мы пишем эти числа, сумму которых нужно всчитать
3- находим сумму
4- пишем чемк она равна
5- выводим массив
и все
если программа не бкдет идти напиши вконце место return(0); => getchar();
0,0(0 оценок)
Ответ:
жenya
12.05.2021 11:42
Uses
crt;
const
n = 100;
var
a: array [1..n] of integer;
b: array [1..n] of integer;
i, j, m: byte;
p1, p2: integer;
begin
write('Количество элементов: ');
readln(m);
clrscr;
writeln('Ввод массива A');
writeln;
for i:=1 to m do   
begin   
write('A[',i,']: ');
readln(a[i]);   
end;
clrscr;
writeln('Ввод массива B');
writeln;
for i:=1 to m do   
begin   
write('B[', i, ']: ');
readln(b[i]);   
end;
clrscr;
writeln;
writeln('Исходный массив А:');
for i:=1 to m do write(a[i]:4);
writeln; writeln; writeln('Исходный массив B:');
for i:=1 to m do write(b[i]:4);
for i:=1 to m-1 do
for j:=m downto i do
begin
if a[i] > a[j] then
begin
p1:=a[i]; a[i]:=a[j]; a[j]:=p1;
end;
if b[j] > b[i] then
begin
p2:=b[i]; b[i]:=b[j]; b[j]:=p2;
end;
end;
writeln; writeln; writeln('Массив А по возрастанию:');
for i:=1 to m do write(a[i]:4);
writeln; writeln; writeln('Массив B по убыванию:');
for i:=1 to m do write(b[i]:4);
writeln; writeln; writeln('Массив A+B:');
for i:=1 to m do
begin 
a[i]:=a[i]+b[i]; 
write(a[i]:4); 
a[i]:=a[i]-b[i];
end;
writeln; writeln; writeln('Массив B-A:');
for i:=1 to m do
begin 
b[i]:=b[i]-a[i]; 
write(b[i]:4);
end;
readln;
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота