Найти сумму первой и последней цифры целого числа.входные данныеодно целое 32-х разрядное число, которое состоит не менее чем из 2-х цифр. число может быть положительным или отрицательным.вывести сумму первой и последней цифры целого числа.входные данные #12345выходные данные #17

1) пусть время, за которое файл размером 10 мбайт со скоростью 2  621  440 бит/c, равно x. следовательно, имеем уравнение: 10 мбайт / x = 2  621  440 бит/c 10 * 1024 * 1024 * 8 бит / x = 2  621  440 бит/c 83 886  080 бит / x = 2  621  440 бит/c x =   83 886  080 бит / 2  621  440 бит/c = 32 c ответ: за 32 секунды.   2) пусть наибольший размер файла, который может быть передан через соединение со скоростью 256  000 бит/с за 10 минут, равен x. следовательно, имеем уравнение: x / 10 мин = 256  000 бит/c x / 10 * 60 с = 256  000 бит/с x / 600 c = 256 000 бит/с x = 256  000 бит/с * 600 с = 153600000 бит = 19200000 байт = 18750 кбайт ответ: наибольший размер файла – 18750 кбайт   3) в 2 байтах может уместится 65  536 разных значений, а именно столько разных цветов мы имеем. значит, для хранения каждого пикселя нам надо 2 байта.   1024x800 = 1024*800 = 819  200 пикселей, а соответственно 2 * 819  200 = 1  638  400 байт. пусть время, за которое файл размером 1  638  400 байт со скоростью 102 400 бит/c, равно x. следовательно, имеем уравнение: 1  638  400 байт / x = 102  400 бит/c 1  638  400 * 8 бит / x = 102  400 бит/c 13107200 бит / x = 102  400 бит/с x = 13107200 бит / 102  400 бит/с = 128 c ответ: 128 секунд.

Var a : array[1..100] of integer; j, i, n, k, out_num, is_out : integer; begin   read(n); {всего людей}   read(out_num); {номер выходящего, в   = 3}   for i : = 1 to n do       a[i] : = 1;   i : = -1;   repeat       i: = (i + 1) mod n;       k : = k + a[i+1];       if k = out_num then begin           a[i+1] : = 0;           is_out : = is_out + 1;           k : = 0;                     writeln;           for j : = 1 to n do write(a[j]: 2);       end;   until n - is_out < = 1;     writeln;   for i : = 1 to n do       if a[i] > 0 then writeln(i); end.