Петя не может быть правым в обоих случаях так как получиться что и петя и женя написали на 5, а тк не может быть по условию. дальше подбираем под петю два оставшихся случая, при том что петя сказал 2 раза правду, но этого не может быть т.к. тогда женя говорит либо 2 неправды либо 50на50, говоря две неправды он противоречит пете о том что он не писал на 5 а говоря правду неправду противоречит и пете и саше. значит петя определенно сказал правду неправду, тогда подставив жене неправду а саше правду получаем что на 5 написал петя.
Держи алгоритм, программу, как я понял уже дали
//Pascal ABC.NET v3.1 сборка 1219
//Как я понял, количество очков случайно
Var
a,i,s:integer;
begin
randomize;
for i:=1 to 5 do
begin
a:=random(11);
writeln(i,' выстрел -',a);
s:=s+a;
end;
writeln('Сумма=',s);
if s=50 then writeln('Идет с Зиночкой в ресторан') else writeln('На тренировку в тир');
end.
Пример работы программы:
1 выстрел -3
2 выстрел -10
3 выстрел -7
4 выстрел -8
5 выстрел -0
Сумма=28
На тренировку в тир
Begin
while true do begin
writeln(random(1000));
end
end.
В одном килобайте = 1024 байта
Всего памяти в байтах = 12 * 1024 = 12 288
Так как адресация памяти в компьютере начинается с нуля то ответ:
12 287