1 строка 3,5,4,2,1,1,2
2 строка 1,2,4,6,7,5,4,3,2,5,6,3,1
3строка 5, 2, 1,7,8,5,6,3,4,10,9,6
Жили-были клавиатура , манитор , память и процесор . Жили они дружно пока невозник спор , кто из них главнее .Каждый из них говорил что он важнее других. Клавиатура говорила:
-Если бы не было меня , то человек бы не смог печатать слова и предложения!
Но манитор возражал:
-Я важнее вас! Ведь если бы меня не было то человек бы не смог увидеть экрана!
Но память твердила всем:
-Я важнее вас всех , ведь если бы меня не было , то человек бы не мог сохранять картинки , разную музыку и разные видео!
А процессор говорил :
-Я мозг компьютера! И я важнее всех потому что если бы меня не было то компьютер бы никогда не включался! И человек бы не смог просматривать диски и флешки!
Но тогда компьютер сказал им всем:
-Ребята , не ссорьтесь , все вы очень важны, и если бы не вы все , то компьютера бы не было!
Вот на этом спор и закончился , и все начали жить дружно , как раньше!
Это на камбуктере заставят делать.
Пусть правильный ответ 5
Var a:integer;
Begin
A:=0;
While a<>5 do Readln(a)
<Остальная часть программы>
1 получается 3
2 получается 9
1 получается 11
2 получается 121
1 получается 123