1200 - 100%
x1 - 74%
x1 = 1200 * 74 / 100
x1 = 888 людей предпочитает казуальные игры
1200 - 100%
x2 - 42%
x2 = 1200 * 42 / 100
x2 = 504
y = x1 - x2
y = 888 - 504
y = 384
Ответ: на 384 человека больше
прикрепила в фото! удачи!
//Pascal ABC.NET 3.1 сборка 1256
Var
a,b:integer;
begin
read(a,b);
writeln(((a div b)*a+(b div a)*b)/((a div b)+(b div a)));
end.
Пример ввода:
8
5
Пример вывода:
8
Program vs4;Var n,b,a,c:integer;Begin Writeln('Введите трехзначное число'); Readln(n); a:=n div 100; b:=(n div 10) mod 10; c:=(n mod 100) mod 10; n:=a+b+c; Writeln('Сумма цифр данного числа=',n);End.