Впаскале! №1 с клавиатуры вводятся 10 натуральных двузначных чисел. определить сколько среди них чисел, кратных 4; №2 с клавиатуры вводятся 10 натуральных двузначных чисел. определить среднее арифметическое нечетных чисел; №3 с клавиатуры вводятся 10 натуральных двузначных чисел. определить верно ли, что среди введенных чисел есть число, в котором первая цифра в два раза больше последней.

Var   n,i,k,j,b,l: integer;   begin  for i: =1 to 10 do begin  read(n);   if n mod 4=0 then l: =l+1;   if n mod 2< > 0 then begin k: =k+n; j: =j+1; end;   if ((n div 10)/(n mod 10))=2 then b: =1;   end;   writeln('1-',l); writeln('2-',k/j); if b=1 then writeln('3-да') else writeln('3-нет');   end. 

// pascalabc.net 3.2, сборка 1356 от 04.12.2016 // внимание! если программа не работает, обновите версию! procedure lineequation(a,b: real; var x: real; var flag: integer); begin   if a=0 then flag: =b=0? -2: -1   else begin x: =-b/a; flag: =0 end end; begin   var a,b,x: real;   write('введите a,b: '); read(a,b);   var flag: =1;   lineequation(a,b,x,flag);   case flag of   0: writeln('x=',x);   -1: writeln('решений нет')   else writeln('бесконечое множество решений')   end end.

Пусть размер изображения x бит. , прям как шкальные начинаются) тогда скорость передачи по каналу связи в город а будет: (x / 90) bit per sec (это битов в секунду) теперь разберемся с ха! поняли? с что такое ха? в смысле икс? это кол-во пикселей по горизонтали * на кол-во пикселей по вертикали и * на размер памяти для кодировки 1 пикселя. заметка автора: звездочка типа "*" - значит знак умножения. ***конец заметки автора*** а изображение увеличелось в 2 раза, как мы знаем из школьного курса , если размеры фигуры растут линейно, то площадь квадратично, как-то так, короче закон квадрата, ищите в интернете. в нашем случаи это значит вот что: размер увеличели мы в 2 раза, значит площадь увеличится 2^2 то есть в 4 раза. следовательно размер изображения теперь будет 4x. ну и теперь пременим глубину это кол-во памяти занимаемое 1 пикселем. вспоминаем формулу, что я объяснял ранее, значит размер нашей картинки равен 4 * (x * y * g), где x - ширина картинки, y - высота картинки, а g - глубина кодирования, она у нас уменьшилась в 1.5 раза, то есть новый размер картинки полностью будет выглядить вот так: 4 * (x * y * g / 1.5) скорость передачи второй картинки по второму каналу связи: 4 * (x * y * g / 1.5)  / 10 bit res sec формула для изначального изображения будет выглядить вот так: x * y * g теперь составим пропорцию: x * y * g      4 * (x * y * g / 1.5)  =       ?                         10 через неё пытаемся найти примерное время передачи первой картинки по второму каналу связи, надеюсь тут всё понятно : ) (для непонятливых: скорость передачи второй картинки мы получаем делением её размера на время её передачи, скорость у нас константная, то есть не меняется, значит точно с такой же скоростью будет передана первая картинка по этому же каналу связи, но времени мы не знаем, по этому скорости прировняем, а неизвестное время будем сейчас искать) ищем по пропорции время, для эотго пременим правило прямоугольника или как оно там называется в школьной , это не важно: (знак вопроса заменил на переменную t) 10 * (x * y * g) = (4 * (x * y * g / 1.5)) * t t = (4 * (x * y * g / 1.5)) / (10 * (x * y * g)) а теперь нам нужно сравнить время передачи между первым и вторым каналом, время первого напомню будет: ((x * y * g) / 90) что бы найти во сколько раз быстрее второй канал, нужно разделить большее время на меньшее: (4 * (x * y * g / 1.5)) / (10 * (x * y * g)) / ((x * y * g) / 90) теперь выражение: пусть x * y * g = 1, то есть константа, которая ни на что не повлияет, ведь у нас относительная величина - пропускная способность канала. тогда получим: (4 * (1 / 1.5)) / (10 * 1) / (1 / 90) ((4 / 1.5)) / 10) / (1 / 90) (4/15) / (1/90) - вспоминаем школьный курс 4/15 * 90/1 - эквивалентное выражение 4/1 * 6/1 - сократили 90 на 15 4 * 6 = 24 ответ: в 24 раза быстрее постскриптум: конечно можно было бы и не так подробно описывать, но надеюсь теперь понятно всё. дерзайте и помните: & программирование — это круто! только учитесь сами - универы, это параша)