1 - 3
2 - 4
3 - 5
4 - 1
5 - 2
6 - 8
7 - 6
8 - 7
9 - 11
10 - 12
11 - 13
12 - 10
13 -9
Ответ:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var s:string;
n,i,k:byte;
begin
readln(s);
n:=length(s);
k:=0;
for i:=1 to n do
if upcase(s[i])='A' then
begin
inc(k);
if s[i]='a' then s[i]:='b'
else s[i]:='B';
end;
writeln(s);
write(k)
end.
Объяснение:
Петя заболел на зимних каникулах. Пока все играли в снежки, катались на лыжах с горки...Петя сидел дома и учил Пушкина. В пятом классе они как раз проходят произведения Пушкина и Марья Ивановна задала на каникулы учить. Петя сам себя не узнал, так как он был круглым двоечником. Если бы не его простуда, он бы сейчас гулял с друзьями и получил по стихотворению 2! Петя обиделся на своих друзей, потому что они даже не пришли узнать, что он, да как он!
В школе, Петины друзья заметили, что из друга нет и позвонили ему, но он не поднял трубку домашнего телефона. Тогда друзья решили прийти к нему домой и узнать, что случилось!
Когда они пришли, у Пети на лице засияла улыбка. Он с радостью открыл им дверь! Они пили чай и вместе делали уроки!
Var ar:array[1..20] of integer;
k,l,a,b:integer;
begin
randomize;
readln(k);
readln(l);
for a:=1 to 20 do
ar[a]:=random(a);
for a:=k to l do
b:=b+ar[a];
writeln(b);
end.
1) с,д,ж,з.
2) б.
3) Не знаю :)
4) с.
5) б.
6) а.
7) с.
8) б.
9) Чтобы не соврать, тоже не знаю :)