Последнее должно быть кулер. А что насчет ребуса? Где картинка?
Решение
Весь текст содержит 60×40×24= 57 600 байт
Далее 57600:1024=56,25 Килобайт
Пожалуйста))
var s:string;
k:byte;
begin
readln(s);
k:= <span>length(s);
write(k)
end.</span>
begin
writeln('Сдача с 1000р при покупке 3 кг и 500г по цене 80 за кг = ', (1000 - (3.5 * 80)):2:2);
end.
Var A,S:real;
n:integer;
Begin
Write('n = ');
Read(n);
a:=10;
For n:= 1 to n do
Begin
a:=a*1.1;
S:=S+a
End;
WriteLn(S)
End.