Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
0 / 0 / 2
Регистрация: 05.12.2010
Сообщений: 7

Выясните, сколько учеников имеют оценки ниже 4

08.12.2010, 13:58. Показов 1644. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Сведения об ученике состоят с его имени и фамилии, названия класса (года учёбы и буквы), в котором он учится,оценок,полученных учеником за последнюю четверть.
Пусть данный массив содержит сведения про учеников школы:
выясните,сколько учеников имеют оценки ниже 4.
сформируйте массив с лучших учеников школы, что не имеют оценок ниже 4 и по суме набранных балов перевешивают баллы учеников своего и параллельных классов
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
08.12.2010, 13:58
Ответы с готовыми решениями:

Выяснить, сколько учеников школы не имеют отметки ниже четырёх.
Задача на теме "запись данных" Выяснить, сколько учеников школы не имеют отметки ниже четырёх.

Выяснить, сколько учеников школы не имеют отметок ниже четверок
Сведения об ученике состоят из его имени и фамилии и названия класса (года обучения и буквы), в котором он учится. Дан файл f, содержащий...

Перевести в следующий класс тех учеников, которые имеют успешные оценки по всем предметам
Составить список учеников школы, включив следующие данные: имя, фамилия, оценки по трем предметам. Переести в следующий класс тех учеников,...

1
0 / 0 / 2
Регистрация: 05.12.2010
Сообщений: 7
09.12.2010, 19:02  [ТС]
Лучший ответ Сообщение было отмечено remember me как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
program lab9;
const n=25;
type student=record
fio:string[30];
nazvaklasu:string[30];
ocinku :array[1..5] of byte
end;
var studasu:student;
kil,i,k,r :integer;
{uchni maut ocinku nuwe 4}
begin
kil:=0;
writeln ('vvedit',n,'pochatok danux');
with studasu do begin
for i:=1 to n do begin
readln (fio);
readln (nazvaklasu);
for r:=1 to 5 do
{readln(ocinku);}
readln;
for i:=1 to n do
for k:=1 to 5 do begin
if ocinku [k]>3
then goto m1;
end,
kil:=kil+1
writeln (fio);
writeln (nazva klasu);
m(:end;{for;}
end{with}
writeln ('kil=',kil);
end;
var studasu:student;
kil;i;k;o integer;
{uchni maut 4i 5 perevuchuuti inshux}
begin
kil:=0
writeln (,'n',pochatok danux)
with studasu do begin
for i:=1 to n do begin
for r:=4 to 5 do begin
(ocinku),readln
for i:=1 to n
for k:=4 to 5 do begin
if ocinku [k]>3; then <>0
end,
kil:=kil+1
writeln (kil);
m(:end;{for;}
end {with}
writeln ('kil=',kil);
end.
что тут не так
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
09.12.2010, 19:02
Помогаю со студенческими работами здесь

Определить, сколько учеников имеют по информатике оценку «5»
Помогите сделать блок схемы: 1. Известны оценки по информатике каждого из 20 учеников класса. Сколько учеников имеют по информатике...

Определите сколько человек имеют рост ниже среднего по группе
Имеется группа из 12 человек разного роста. Определите сколько человек имеют рост ниже среднего по группе Помогите пожалуйста, срочно...

Выяснить, сколько учеников школы не имеют оценок ниже четырех
Дан файл f, содержащий сведения об учениках школы: имени и фамилии и наименование класса (года обучения и буквы), в котором он учится, и...

Файлы: Выяснить, сколько учеников школы не имеют оценок ниже четырех
Дан файл F cодержащий сведения об учениках: Имя и фамилия, год обучения и буква, и оценки, которые ученики получили за последнюю четверть....

Составить список учеников школы: перевести в следующий класс тех учеников, которые имеют успешные оценки
Составить список учеников школы, включив следующие данные: имя, фамилия, оценки по трем предметам. Перевести в следующий класс тех...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru