Маленький мальчик несколько часов наблюдал за движением двух лифтов в аэропорту и заметил, что: (1) оба лифта все время двигались с постоянной по величине скоростью, причем правый лифт в 1.3 раза быстрее левого (время на вход и выход пассажиров, разгон, торможение и изменение направления движения лифтов несущественно и считается равным 0); (2) правый лифт двигался вверх одновременно с тем, как левый лифт двигался вниз, так же долго, как правый лифт двигался вниз одновременно с тем, как левый лифт двигался вверх; (3) лифты двигались одновременно в разные стороны в течение 39 минут; (4) в конечный момент времени оба лифта вернулись в те же положения, в которых они были в начале наблюдения. определите, что дольше: оба лифта одновременно двигались вверх или оба лифта одновременно двигались вниз и на сколько минут?

#include "stdafx.h"#include < iostream> #include < windows.h> #include < ctime> using namespace std; int main(){ setconsolecp(1251); setconsoleoutputcp(1251); srand(time(0)); int core[5][5]; int t, n; bool cf, p; for (int i = 0; i < 5; i++) { for (int j = 0; j < 5; j++) { t = 0 + rand() % 2; core[i][j] = 0 + rand() % 20; if (t == 1) { core[i][j] = -core[i][j]; } cout < < " " < < core[i][j] < < " "; } cout < < endl; } cout < < endl; cout < < "последняя цифра " < < endl; cin > > n; for (int i = 0; i < 5; i++) { for (int j = 0; j < 5; j++) { if (core[i][j] % 10 == n) { cf = true; } if (core[i][j] > 0) { p = true; } } } if (cf == true) { cout < < "число, оканчивающееся на цифру " < < n < < " есть"< < endl; } else { cout < < "числа, оканчивающегося на цифру " < < n < < " нет" < < endl; } if (p == true) { cout < < "положительное число есть" < < endl; } else { cout < < "положительных чисел нет " < < endl; }}

Function isprime(n: integer): boolean;   // проверка, является ли число простым var   p: integer;   found: boolean; begin   found : = (n mod 2 = 0);   p : = 3;   while (not found) and (sqr(p) < = n) do   begin       found : = (n mod p = 0);       p : = p + 2   end;   isprime : = (not found) or (p = 2) end; const   n = 20; var   i, k: integer;   a: array[1..n] of integer; begin   write('введите 20 целых чисел через пробел: ');   for i : = 1 to n do   begin       read(a[i]);   end;   k : = 0;   for i : = 1 to n do       if isprime(a[i]) then k : = k + 1;   writeln('количество простых чисел- ', k) end. тестовое решение: введите 20 целых чисел через пробел: 5 36 83 1673 339 73 34 14623 7 173 62 45 3463 326 28 934 345 24 4526 1143 количество простых чисел- 6