"даны вещественные числа t , x, y, z. поменять их значения местами "по кругу" записав на место t значения x , на место x значение y, на место y значение z, на место z значение t"

Var t, x, y, z, m, n: real; begin   writeln ('vvedite t, x, y, z');   readln(t, x, y, z);   m: =z;   z: =t;   n: =y;   y: =m;   m: =x;   x: =n;   t: =m; writeln ('t = ', t); writeln ('x = ', x); writeln ('y = ', y); writeln ('z = ', z); end.

Відповідь:

#include <iostream>

using namespace std;

int main(){

setlocale(LC_ALL , "Rus");

int N,t,P,output = 0;

cout << "Введите кол-во людей в очереди N: ";

cin >> N;

cout << "Введите время на одного человека t: ";

cin >> t;

cout << "Введите ваше место в очереди P: ";

cin >> P;

for(int i = 0; i < P; i++ ){

 output += t;

}

cout << "Перед вами " << P-1 << " человек вам придеться ждать: " << output << " минут" << endl;

return 0;

}

f=[]

for x in range(25552,58886):

   q=0

   for d in range(10,100):

       if x%d==0:

           q+=1

   if q>=15:

       f.append(x)

print(max(f),len(f))

Объяснение:

1 строка - создание массива

2 строка - перебор чисел в указанном диапазоне до последнего элемента не включительно

3 счетчик для счета делителей

4 перебор возможных делителей (до последнего числа не включительно )

5 проверка является число делителем или нет

6 подсчет этих делителей

7 проверка на количество делителей

8 добавления числа (x) в массив , т.е. тех чисел , что имеют не менее 15 делителей

9 вывод максимального значения массива и его длины