В метании молота состязается n спортcменов. Каждый из них сделал m бросков. (n

64=2^i
i=6 бит на символ
V=128*6=768 бит /8=96 байт

Для вывода графической информации в персональном компьютере используется:
Ответ. 3) экран дисплея

For k:= -1 to1 do ...Будет выполняться 3 раза; ++++++++++
for k: = 10 to 20 do ...Будет выполняться 11 раз; +++++
for k: =20 to 10 do ...Будет выполняться 0 раз; +++++++
k:= 5; r:=15; for i:= k+1 to r-1 do ...Будет выполняться 9 раз; +++++
k:= 5; r:= 15; for i:= 0 to k*r do ...Будет выполняться 76 раз; +++++++
k: = r ; for i:= k to r do ...Будет выполняться 1 раз. ++++++

правельно вот код для теста:
var i,n,k,r:integer;
begin
k:=r;
for i:=k to r do begin
n:=n+1;
writeln(n);
end;
end.

На питоне:
s1 = input("Bвeдитe 1 строку: ")
s2= input("Bвeдитe 2 строку: ")
if s1.find(s2)>=0: print(s2+" входит в "+s1)
else: print(s2+" не входит в "+s1)

Пример 1:
Bвeдитe 1 строку:
abcdefg
Bвeдитe 2 строку:
cde
cde входит в abcdefg

Пример 2:
Bвeдитe 1 строку:
abcdefg
Bвeдитe 2 строку:
ac
ac не входит в abcdefg