P = 0
print('a')
a = int(input())
print('b')
b = int(input())
z = b
if b < 0:
z = -b
for i in range(1, z+1):
p += a
if b < 0:
p = -p
print('p =', p)
Var
a,b,c: integer;
x,y,z:string;
begin
x:='рубль';
y:='рубля';
z:='рублей';
writeln('Сколько стоит метр ткани?(в рублях)');
readln(a);
writeln('Сколько вы хотите купить ткани?(в метрах квадратных)');
readln(b);
c:=a*b;
if c=1 then
begin
writeln('Это будет стоить',' ',c,' ',x);
end;
if (2<=c) and (c<=4) then
begin
writeln('Это будет стоить',' ',c,' ',y);
end;
if (5 <= c) and(c <= 1000000) then
begin
writeln('Это будет стоить',' ',c,' ',z);
end;
end.
<span>В зависимости от результата программа будет выводить разное окончание.
1 рубль;
3 рубля;
100 рублей.
</span>
Ось, відкрий та подивись картинку(сам робив)))))
Рисунок с кругами Эйлера - в прилагаемом файле.
Решение:
К1+К2+К3 = 20000
К1+К2 = 14000
К2+К3 = 16000
К2 - ?
К2 = (К1+К2)+(К2+К3)-(К1+К2+К3) = 14000+16000-20000 = 10000