Фруктовый магазин продает яблоки по афруктовый магазин продает яблоки по а руб. за кг., груши по в руб. за кг., апельсины по с руб. за кг. в первые два дня недели продано: понедельник - x кг. яблок, y кгю груш, z кгю апельсинов (x,y,z - принимают разные значения в понедельник и во вторник). напишите программу, которая будет вычислять, на какую сумму прдал магазин фруктов в каждый из этих дней и за оба дня вместе.

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 var   a, b, c, x, y, z: integer;   Summa1, Summa2: integer; begin   write('Яблоки(руб/кг): ');   readln(a);   write('Груши(руб/кг): ');   readln(b);   write('Апельсины(руб/кг): ');   readln(c);   writeln;   writeln('Понедельник: ');   write('Продано кг яблок: ');   readln(x);   write('Продано кг груш: ');   readln(y);   write('Продано кг апельсинов: ');   readln(z);   Summa1:=x*a+y*b+z*c;   writeln;   writeln('Вторник: ');   write('Продано кг яблок: ');   readln(x);   write('Продано кг груш: ');   readln(y);   write('Продано кг апельсинов: ');   readln(z);   Summa2:=x*a+y*b+z*c;   writeln;   writeln('Понедельник: ', Summa1, ' руб; Вторник: ', Summa2, ' руб'); end.