8. Визначте заробітну платню робітника, якщо йому нараховано S грн, а податок складає P%. Екран повинен мати вигляд: Введіть вхідні дані: нарахована сума (грн) –> 1500 податок (%) –> 10

Заробітна платня = 1350 грн.

написати програму на паскаль​

1.
Var a,b,pr:integer;
Begin
pr:=1;   
write('Вводите числа, когда закончите - введите 0. '); readln(a);
while (a<>0) do  begin 
 if (a>0) and (a<10) then begin b:=b+1; pr:=pr*a; end; readln(a)  end;
Writeln('Чисел, больше 0 и меньше 10: ',b,' их произведение:',pr);end.

2.
Var a,b,c,i,sum,f:integer;
Begin
 Write('Введите 10 двузначных чисел: '); repeat readln(a); until(a>=10) and (a<100);
for i:=1 to 10 do 
  begin 
     repeat readln(a); until(a>=10) (a<100)
      b:=a mod 10;
      c:=a div 10;
       sum:=b+c;
        if (sum mod 2 = 0) then f:=f+1;
end;
Writeln('Кол-во цифр, удовлетворяющих условию: ',f);
end.

3.
Var a,b,c:integer;
Begin 
  write('Вводите целые положительные числа.');
repeat
   readln(a);
b:=b+a;
c:=c+1;
 until (b>100);
Writeln('Кол-во введёных чисел:',c,' их сумма:',b);
end.
   

Шаг 1 Откройте браузер и в адресной строке укажите IP-адрес маршрутизатора 192.168.0.1 или доменное имя Нажмите кнопку Enter

Шаг 2 В окне входа в систему укажите имя пользователя и пароль. По умолчанию имя пользователя и пароль admin

Шаг 3 В левой части окна перейдите в меню Сеть (Network) -> Локальная сеть (LAN) и укажите нужное значение IP-адреса

Шаг 4 Нажмите кнопку Сохранить (Save), чтобы сохранить сделанные изменения

Объяснение:

Примечание: После того как вы изменили IP-адрес необходимо обновить настройки IP-адреса у вашего компьютера или переназначить IP-адрес вашего компьютера. При входе в систему управления маршрутизатором указывается новый IP-адрес