Создать базу данных "успеваемость":
1. построить модель данных для выбранной предметной области
2. подготовить информацию для заполнения базы данных.
3. создать базу данных и заполнить ее подготовленной информацией
успеваемость (сведения об успеваемости учащихся школ административного района за учебный год).
база данных должна состоять из четырех таблиц, образующих следующую схему: школа---класс---предмет---успеваемость
в таблицах должна содержаться следующая информация: номер школы, адрес, фио директора школы, телефон директора, количество учащихся в школе, номер класса, фио классного руководителя, количество учащихся в классе, название предмета, фио учителя, наличие у учителя почетных званий, наличие специализированного кабинета, фамилия и имя ученика, оценка за 1-ю четверть, оценка за 2-ю четверть, оценка за 3ю четверть, оценка за 4ю четверть, годовая оценка.
98 ,главное ! буду безумно
115
204
Ответы на вопрос:
Var sum, n: longint; begin for var i: =1 to readinteger ('введите кол-во чисел: ') do begin n: =readinteger ('введите число: '); if abs(n) in [10..99] then inc (sum, n); end; write ('сумма двузначных: ', sum); end.
Популярно: Информатика
-
btrawee3415.08.2020 04:53
-
3546526.09.2021 14:12
-
allanazarova1226.08.2021 11:41
-
ivettapopova04511.02.2023 16:08
-
Z0L0Tk0C00L10.04.2023 13:03
-
olesyapurzikova18.12.2022 00:55
-
ник504614.11.2020 18:08
-
vlodimirfrolov04.10.2020 01:19
-
alenushka7313.03.2023 03:02
-
DarthTyranus31.07.2022 20:12