Добавить возможность настраивать игру через ввод в консоль, спрашиваем: Кол-во попыток (не забудь сделать преобразование); Секретное слово; Имя игрока (при проигрыше и выигрыше программа должна говорить "Вася, ты выиграл" или "Вася, ты проиграл"). Добавить к этой программе на python,те возможности которые я написал. import random print("Давай поиграем,я загадал слово,тебе нужно отгадать его по буквам") word=random.choice(fruits) letters=[] attempts=3 while attempts>0: victory=True letter=input("Введите букву: ") letters.append(letter) for char in word: if char in letters: print(char,end="") else: print("*",end="") victory=False print() if letter not in word: attempts=attempts-1 print("Такой бувквы в слове нет,попробуйте еще раз.У вас осталось попыток: " +str(attempts)) if attempts==0: print("Ты проиграл,загаданное слово: " +word) if victory==True: print("Ты выйграл") break
begin
var a:=MatrixRandom(7,7,0,9);
var k:=0;
for var i:=0 to 6 do begin
for var j:=0 to 6 do begin
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.
Тестовое решение:
2 1 7 3 3 2 7
9 2 9 2 0 5 5
4 2 6 9 4 6 0
1 0 3 5 4 5 9
6 3 6 0 2 0 8
0 8 4 3 2 1 8
6 0 4 4 5 4 0
Кол-во элементов на [1,5]: 27
Вариант "совсем для школы"
const
n=7;
var
a:array[1..n,1..n] of integer;
i,j,k:integer;
begin
Randomize;
k:=0;
for i:=1 to n do begin
for j:=1 to n do begin
a[i,j]:=Random(10);
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.
1) a x a = a² ⇒ b; b x a = a³ ⇒ результат
2) a x a = a² ⇒ b; b x b = a⁴ ⇒ c; c x c = a⁸ ⇒ c; c x b = a¹⁰ ⇒ результат
Программа на языке PascalABC.Net
var
a,b,c,y:real;
begin
Write('Введите число: '); Read(a);
b:=a*a; y:=b*a; Writeln('Третья степень числа равна ',y);
c:=b*b; c:=c*c; y:=b*c;
Writeln('Десятая степень числа равна ',y)
end.
Тестовые решения:
Введите число: 2
Третья степень числа равна 8
Десятая степень числа равна 1024
Введите число: -13.594
Третья степень числа равна -2512.128188584
Десятая степень числа равна 215512594781.574