Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
const
s = 'байт';
var
i, sum : integer;
begin
sum : = 0;
for i : = 1 to 4 do
sum : = sum + ord (s[i]);
writeln (sum);
end.
3^i = 18
i = 3
ответ. 3 лампочки.
uses crt; var n: integer; beginread(n)n: =abs(n)-2; write(n); end.
Популярные вопросы