Сотрудники отдела разработки составили запрос на покупку компьютеров и их составляющих: — 6 ноутбуков за 55480 руб.; — 3 монитора за 21830 руб.; — 11 компьютерных мышек за 411

руб.; - 5 клавиатур за 290 руб бухгалтеру посчитать, какую сумму нужно выделить из

бюджета компании. Python

var

  x,y,z: longint;

begin

  readln(x,y,z);

if (x> 100)or(y> 100)or(z> 100) then writeln('false')

else writeln('true');

end.

1.найти разность показаний счетчика на конец месяца и на начало месяца.

2.умножить на цену одного квт/часа

program;

var

max,val: integer;

label

start, ends;  

begin 

max: =-50;

val: =50;

start:

if val> max then val: =val-10

if val=max then goto ends;  

goto start;  

ends:

end. 

блок схема,в jpeg формате (картинка ) сделана в word 2007.у вас ошибка составление программы (var max,x,e: real; ) [хотя вы запрашиваете x,y]

картинка загружаться не хочет =),на сайт.

зеркало