program griby;
var k: integer;
begin
readln (k);
writeln ('Мы нашли в лесу',k,' ', ' грибов');
end.
Классный час
Белое солнце пустыни
<span>ln(100)/ln(2)~= 7 лампочек
ответ: 2
</span>
кодек -кодекС
кодек - <span>шифратор/дешифратор</span>
<span> кодекс- свод законов</span>
Var n, tmp, sum, i:integer;begin readln(n); sum := (n * (n + 1)) div 2; for i := 1 to n - 1 do begin read(tmp); sum := sum - tmp; end; writeln(sum);<span>end.</span>