240 : 4 =60 минут короче 1 час
Кодирование,вдро,река,вено
1) 11-2=9 9-2=7 7-2=5 5*3=15 15-2=13
ответ: 11121
2) а)1317 (сумма старших разрядов 3+2+8=13, сумма младших разрядов 1+9+7=17)
б)1114 (сумма старших разрядов 1+8+5=14, сумма младших разрядов 3+2+6=11)
3) а) История любви б) Яша юркнул в эллинг
Var
i, sum: integer;
begin
sum := 0;
i := 5;
repeat
sum := sum + i * i;
i := i + 1;
until(i > 10);
write(sum);
end.
Const n = 5;
var
i, p, x:byte;
z: array[1..n] of byte;
begin
readln(x);
for i:=1 to n do
begin
readln(z[i]);
if z[i]=x then p:=i;
end;
writeln(p);
end.