Program n1;
var i, n : integer;
begin
for i:=1 to n do writeln (n)
end.
17 = (5 * 3 - 7) * 3 - 7
Количество команд - 4; (Действие с числом = 1 команда)
Program p1;
uses crt;
var a,b,i:integer;
begin
for i:=15 to 25 do begin
a:=a+i*i;
b:=i*i;
writeln('Сумма:',a,'(квадрат числа :',i,'=',b,')');
end;
write(a);
end.
В кодировке КОИ-8 для кодирования одного символа используется 8 бит = 1 байт. В предложении "<span>Можно получить все, но не все сразу" 35 символов (включая пробелы и знаки препинания).
Объем = 1*35 = 35 байт</span>
Text='Hello, world!'
print(text[text.rfind(' ')+1:]+text[text.find(' '):text.rfind(' ')+1]+text[:text.find(' ')])