1.
37*37*2=2738
2.
161*161=25921
4 Кбайт = 4096 байт = 32768 бит
32768 бит/25921=1.26
1 Cvet
p.s. ne uveren 2
1 вапрос атвет 1 2 вапрос 3 атвет 3 вапрос 1 атвет 4 атвет 1 атвет
<em>// PascalABC.NET 3.3, сборка 1542 от 05.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln(ReadSeqInteger('Вводите:',ReadInteger('n=')).Any(x->x<0))
end.
<u>Примеры</u>
n= 5
Вводите: 6 -4 56 34 0
True
n= 3
Вводите: 67 9453 457
False
Ответ:
U1 - ложь
Объяснение:
просто логически посмотри на схему, если ложь - идем по дорожке с минусом, если правда - по дорожке с плюсом