Задачу удобно решать с помощью кругов Эйлера (см. рис.).
K1+K2+K3+K4+K5+K6 = 1000
K2+K4 = 250
K4+K5+K6 = 200
K3+K5 = 500
K4 = 20
K5 = 10
K2+K3+K4+K5+K6 - ?
K1 - ?
K2+K3+K4+K5+K6 = (K2+K4)+(K4+K5+K6)+(K3+K5)-K4-K5 = 250+200+500-20-10 = 920
K1 = (K1+K2+K3+K4+K5+K6)-(K2+K3+K4+K5+K6) = 1000-920 = 80
Ответ:
Объяснение:
print("Введите пять слов через пробел")
inp = input()
words = inp.split()
print("You have entered: {0}, {1}, {2}, {3}, {4}".format(words[0], words[1], words[2], words[3], words[4]))
<u>PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
// 1
var (x,y):=ReadReal2('Введите x и y:');
Writeln((x>0) and (y>0));
// 2
var a,c,d:longint;
Write('Введите число, его квадрат и куб: '); Read(a,c,d);
Writeln((a*a=c) and (a*a*a=d))
end.
<u>Пример</u>
Введите x и y: 3.5 1.8
True
Введите число, его квадрат и куб: 15 225 1225
False
var
x, y, s: integer;
begin
readln(x, y);
s := (2*x + y) * (x-y);
writeln(s);
end.
В последних версиях Windows можно нажать Windows+R, в появившемся окне набрать mspaint и нажать ok (или Enter на клавиатуре)