9. дано трехзначное число. определить: а) является ли сумма его цифр двузначным числом; b) является ли произведение его цифр трехзначных числом; c) больше ли числа а произведение его цифр; число а – любое, оно вводится с клавиатуры; d) кратна ли пяти сумма его цифр; e) кратна ли сумма его цифр числу а; число а – любое, оно вводится с клавиатуры; числа вводить, пока не будет введён нуль. блок-схему и программу. : )

Программа Вот:
Program z1;Var a,b,c,d,k:integer;BeginWriteln('Введите трехзначное число');REadln(a);While a<>0 do beginWriteln('Введите трехзначное число');REadln(a);b:=a div 100 mod 10;c:=a div 10 mod 10;d:=a mod 10;if b+c+d div 10 >0 then writeln('Сумма цифр- двузначное число') else writeln ('Нет, сумма цифр не двузначное число');if b*C*D div 100 >0 then writeln('Произведение цифр- терхзначное число') else writeln ('Нет, произведение цифр не трехзначное число число');Writeln ('Введите любое число');Readln (k);If b*c*d>k then writeln('Произведение цифр больше числа') else writeln('Произведение меньше числа');if B+c+d div 5 =0 then writeln('Сумма цифр числа кратна 5') else writeln ('Сумма цифр не кратна 5');if B+c+d div k =0 then writeln('Сумма цифр числа кратна числу, введенному с клавиатуры') else writeln ('Сумма цифр не кратна числу, введенному с клавиатуры');End;End. 
Есть маленькая проблема в начале, не помню как прописывать, поэтому число первый раз нужно вводить 2 раза, если не устраевает, можете воспользоваться другими ресурсами  

1.)для pubg lite требуется directx 11

2.)требуется dx11 версии 10.0

3.) вы получите эту ошибку, если ваша графическая карта не поддерживает direct x 11.

4.) критическая ошибка (assertion failed)

эта проблема может возникнуть, если ваша графическая карта перегревается, например, из-за большого количества пыли внутри корпуса пк. если вы столкнулись с этой проблемой, мы предлагаем вам почистить корпус, а также удалить графический драйвер и установить его заново.

5.) проблема с nvidia geforce

вы получите эту ошибку, если драйеры вашей видеокарты карты сильно устарели. если они не обновлены производителем, возможно, вы не сможете обновить драйвер до требуемой версии.

6.) launcher.exe - bad image

вы можете столкнуться с этой проблемой, если microsoft visual c ++ загружен с ошибками.
7.) недоступно в вашем регионе.

вы можете столкнуться с этой ошибкой, когда ваш часовой пояс настроен неправильно.


ну как то

print('--- 1 ---')

b = float(input('Введите b: '))

a = b**3/9-6.4*(b+8)+3*b/4

print('a =', a)

print()

print('--- 2 ---')

a = float(input('Введите a: '))

b = float(input('Введите b: '))

d = a**3*b/7-2*a*b**2*(a+b)

print('d =', d)

print()

print('--- 3 ---')

a = float(input('Введите a: '))

b = float(input('Введите b: '))

q = (3*a**3-2*a*b+b**2)/(2*a*(3*a-b))

print('q =', q)

print()

print('--- 4 ---')

x = float(input('Введите x: '))

y = float(input('Введите y: '))

k = x**3-4*x*y*(x+y**2)

print('k =', k)

print()

print('--- 5 ---')

v = float(input('Введите v: '))

h = abs(v+1.7)*(2*v+3)

print('h =', h)