a - уровень продаж, а затем зп первого менеджераb - второго менеджераc - третьегоуровень продаж у всех разный.язык программирования: паскальvara, b, c: integer; beginreadln (a); if a < 500 thena : = 0.03 * a + 200; if (a > 500) and (a < 1000) thena : = 0.05 * a + 200; if a > 1000 thena : = 0.08 * a + 200; readln (b); if b < 500 thenb : = 0.03 * b + 200; if (b > 500) and (b < 1000) thenb : = 0.05 * b + 200; if b > 1000 thenb : = 0.08 * b + 200; readln (c); if c < 500 thenc : = 0.03 * c + 200; if (c > 500) and (c < 1000) thenc : = 0.05 * c + 200; if c > 1000 thenc : = 0.08 * c + 200; if (a > b) and (a > c) thena : = a +200; elseif b > c thenb : = b + 200; elsec : = c + 200; wreteln ('зп первого менеджера: ', a, '$'); wreteln ('зп второго менеджера: ', b, '$'); wreteln ('зп третьего менеджера: ', c, '$')end.
План характеристики химического элемента
по его положению в периодической таблице элементов
1. Название химического элемента. Химический знак этого элемента.
2. Положение в периодической таблице (порядковый номер, номер периода (малый, большой), номер группы.
3. Металл или неметалл.
4. Высшая валентность в кислородных соединениях, формулы высшего оксида, соответствующего гидроксида или кислоты, характер их свойств.
5. Валентность в водородном соединении, формула летучего водородного соединения (для неметаллов).
В ответе ставим только номера пунктов плана.
program zadacha_1;
var max,rd,i,txr:integer;
begin
i:=1;
repeat;
writeln('Введи ',i,' -ое число');
readln(rd);
if max<rd then txr:=i;
i:=i+1;
until rd=0;
writeln('Номер максимального элемента - ',txr);
end.