var x: integer;
begin
write('X=');
readln(x);
if x mod 2=0 then
writeln('X является чётным числом');
else
writeln('X является нечётным числом');
end;
1. 1 год 3 рыбки, 2 год 1 рыбка, 3 год ещё одна и того 35 рыбак он поймал, ну и столько они сели.
2. 5+7+9+11+13+15+17+19+21+23=140 мин или 2 часа и 20 мин
1) 1800 символов- утеряно будет
1800 байт или 14 400 бит
<span>2) остается 59 400 символов, 59 400 байт или 475 300 бит</span>
Program Chisla;
Var a,p:integer;
Begin
P:=1
For a:=10 to 16 do
P:=p*a;
Writeln(P);
End.
import Foundation
func makeList(_ n: Int) -> [Int] {
return (0..<n).map{ _ in Int.random(in: 1 ... 100) }
}
let list = makeList(15) // [9, 30, 66, 2, 29, 16, 92, 84, 90, 6, 43, 20, 17, 31, 64]
var summ = 0
for number in list {
summ += number
}
print(summ) // 599