ОТДЕЛ Задание+; ИСПОЛЬЗУЕТ Матем ИЗ "...\Отделы\Числа\";
ПЕР массив: РЯД 10, 10 ИЗ ЦЕЛ; сч1, сч2, макс_гл, разн, мин, макс: ЦЕЛ;
УКАЗ ОТ сч1 := 0 ДО 9 ВЫП ОТ сч2 := 0 ДО 9 ВЫП массив[сч1, сч2] := УЗК(ВШИРЦЕЛ(Матем.случ() * 9)) + 1; ЕСЛИ сч1 = 0 И сч2 = 0 ТО мин := массив[0, 0]; макс := мин; макс_гл := макс ИНАЧЕ ЕСЛИ массив[сч1, сч2] < мин ТО мин := массив[сч1, сч2] АЕСЛИ массив[сч1, сч2] > макс ТО макс := массив[сч1, сч2] КОН; ЕСЛИ сч1 = сч2 И массив[сч1, сч2] > макс_гл ТО макс_гл := массив[сч1, сч2] КОН КОН КОН КОН; разн := макс - мин
begin var a:=ReadReal('Введите зарплату в первый месяц->'); var z:=0.00; for var i:=1 to 12 do begin Writeln('Доход за ',i,' месяц составил ',a:0:2,'р.'); z+=a; a:=a+a*0.1; end; Writeln('Зарплата за год: ',z:0:2,'р.'); end.
Пример: Введите зарплату в первый месяц-> 100 Доход за 1 месяц составил 100.00 р. Доход за 2 месяц составил 110.00 р. Доход за 3 месяц составил 121.00 р. Доход за 4 месяц составил 133.10 р. Доход за 5 месяц составил 146.41 р. Доход за 6 месяц составил 161.05 р. Доход за 7 месяц составил 177.16 р. Доход за 8 месяц составил 194.87 р. Доход за 9 месяц составил 214.36 р. Доход за 10 месяц составил 235.79 р. Доход за 11 месяц составил 259.37 р. Доход за 12 месяц составил 285.31 р. Зарплата за год: 2138.43 р
1 вариант : Слон.
2 вариант : Нот
3 Вариант : Атн
Вывод:
ответ : 1) Слон
Объяснение: