Не ну я ток в 6 классе Сорян пацан
Объем информации в первом случае: I=v1*t1, во втором I=v2*t2, где v- скорость передачи, t- время передачи. Так как объем информации в первом и во втором случае одинаков составим уравнение:
v1*t1=v2*t2
t2= v1*t1/v2 = 5000*25/10000= 12,5 с.
1)
for i := 1 to n do
read(a[i]);
for i := 1 to n do
if (a[i] div 100 = 0)and(a[i] div 10 > 0) then
write(a[i], ' ');
2)
for i := 1 to n do
read(a[i]);
for i := 1 to n do
if (a[i] mod 2 = 0) then
write(a[i], ' ');
3)
for i := 1 to n do
read(a[i]);
for i := 1 to n do
if (a[i] mod 2 = 0)then
a[i] := a[i]*2
else
a[i] := a[i] - 1;
for i := 1 to n do
wirte(a[i]);
В отличие от цикла while, условие вычисляется после
очередной итерации цикла, и если оно истинно, то происходит выход из цикла.
Таким образом, операторы, образующие тело цикла оператора
repeat, выполняются по крайней мере один раз.
Цикл повторяется до тех пор, пока условие записанное после ключевого слова until, будет ложным (не выполняется). Как только это условие выполнится, происходит выход из цикла.
1)Цикл выполнится 1 раз:
i:=i-1=-1
s=-1/1=-1
-1<1 условие выполняется, цикл прерывается.
2)цикл выполнится 3 раза:
1. i:=i+1=1; 1>2 условие не выполняется, цикл продолжается.
2. i:=i+1=2; 2>2 условие не выполняется, цикл продолжается.
3. i:=i+1=3 3>2 условие выполняется, цикл прерывается.
Программа считает кол-во цифр больше 4-х и кол-во цифр меньше шести в твоем числе.
Первая цифра - это кол-во числе больше 4-х.
Вторая цифра - соответсвенно.
В итоге ответ получается: 10556
