В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
lycena
lycena
20.01.2023 22:46 •  Информатика

Для удобства прикрепил фаил Практическая работа «Бюджет семьи»

Порядок выполнения:
1. изучи характеристику членов семьи ( таблица 1 ) и запиши данные в тетрадь.
2. составь бюджет семьи на квартал ( август, сентябрь, октябрь) используя справочные данные.
3. сравни доходную и расходную части бюджета, сделай выводы.
4. внеси предложения, которые сбалансировать бюджет семьи.
5. ответь письменно на вопросы.

Таблица 1.
№ варианта Семейный статус возраст Место работы, учебы Заработная плата, пенсия, стипендия примечание
1
2
3 прабабушка 85
80
75 10000
8000
5000 Ветеран ВОВ
Ветеран ВОВ

4
5 прадедушка 90
85 11000
9500 Ветеран ВОВ
Ветеран ВОВ
1,2
4.8 бабушка 60
48 Гардеробщица
Экономист 4300
9000 Кроме летних месяцев
6
7 дедушка 66
59 Вахтер
Инженер 4300
9600
1, 5, 7
2, 3
4, 6, 8 мама 40
30
25 Бухгалтер
Продавец
менеджер 15000
8000
10000
8, 7
3, 6
4, 8 папа 40
35
28 Предприниматель
Слесарь-сборщик
программист 20000
12000
10000
1
5
2, 4 сын 20
16
6 Студент
Уч-ся 11класса 1100 Дневное отд.

Посещает детский сад
8,4
1, 7,
3, 5, 6 дочь 4
16
7
Учащаяся коллед.
Уч-ся 2-го класса Посещает детский сад
Договор,24000руб

Справочные данные:
Все семьи живут в 3-х комнатных квартирах общей площадью:
1.2.3 вариант-59кв.м в 5-ти этажном доме;
4.5.6 вариант-65кв.м в9-ти этажном доме;
7.8.вариант -85кв.м. в12-ти этажном доме.
Оплата коммунальных услуг:
содержание жилья – 6,67 руб. за 1 кв.м.
отопление – 12,12 руб. за 1 кв.м.
лифт – 3,55 руб. в месяц за 1 кв.м.
холодная вода – 180 руб. в месяц на человека
горячая вода – 200 руб. в месяц на человека
водоотведение- 150 руб. в месяц на человека
вывоз ТБО – 38 руб. в месяц на человека
радио – 40 руб. в месяц
антенна – 18 руб. в месяц
телефон – 500 руб. в месяц
газ – 100 руб. в месяц на человека
электроэнергия – 2,19 руб. за кВатт/час при норме 100 кВатт/час в месяц на человека
Расходы на питание:
дети до 7 лет – 3500 руб. в месяц на человека
школьники от 7 до 16 лет – 4000 руб. в месяц на человека
студенты от 17 до 22 лет – 4500 руб. в месяц на человека
взрослые от 23 до 50 лет – 4200 руб. в месяц на человека
пожилые старше 50 лет – 3300 руб. в месяц на человека
Непродовольственные расходы:
2000 руб. в месяц на человека
Культурно-бытовые расходы:
800 руб. в месяц на человека
Непредвиденные расходы:
500 руб. в месяц на человека
Плата за обучение:
детский сад – 800 руб. в месяц за 1 ребенка
музыкальная школа – 500 руб. в месяц за 1 ребенка
бассейн – 1800 руб. в месяц на человека
кружки, секции – 500 руб. в месяц на человека
компьютерные курсы – 1000 руб. в месяц на человека
подготовительные курсы – 3000 руб. в месяц на человека
Летний отдых:
детский лагерь – 3000 руб. путевка на человека
турбаза – 1000 руб. в день на человека
отдых на море – 1500 руб. в день на человека
отдых за границей – 2500 руб. в день на человека

Контрольные вопросы:

1. как называется прямой товарообмен?
2. вставьте слово, означающее то же, что и слова вне скобок долг, (….), ссуда
3. в чем разница понятий иждивенец и нахлебник?
4. вставьте слово, означающее то же, что и слова вне скобок недостаток, (….), убыток
5. как называется ценная бумага, передающая человеку часть государственного имущества?

Показать ответ
Ответ:
89622356703
89622356703
06.12.2022 22:48
//Pascal ABC.NET v3.0 сборка 1111

Const
 s=5;

Var
 ar:array[1..s] of integer;
 n,m,i:integer;
begin
 writeln('N');
 readln(n);
 writeln('M');
 readln(m);
 writeln('Array:');
 for i:=1 to s do
   readln(ar[i]);
 writeln('First array:');
 for i:=1 to s do
  begin
   write(ar[i]:4);
   if ar[i] div n<>0 then ar[i]:=ar[i]+m;
  end;
 writeln;
 writeln('Final array:');
  for i:=1 to s do
   write(ar[i]:4);
end. 

Пример ввода:
3
3
1
2
3
4
5
Пример вывода:
First array:
   1   2   3   4   5
Final array:
   1   2   6   7   8

//Блок-схема во вложении
Ввести двумерный массив a. все элементы, которые при целочисленном делении на n ненулевое значение,
0,0(0 оценок)
Ответ:
komarenko
komarenko
24.05.2020 01:39
1)
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;   
max:=0;
while n>0 do 
begin 
m:=n mod 10; 
if m<min then min:=m; 
if m>max then max:=m; 
n:=n div 10; end;   
writeln('Максимальное число: ',max);   
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота