Кімната має форму прямокутного паралелепіпеда. Ширина 4 метра, довжина 5 метрів, висота 2.5 метра. Площа стін кімнати дорівнює 9.8 площі бічної поверхні цього паралелеріпеда. Скільки фарби у кг потрібно для того, щоб повністю пофарбувати стіни і стелю цієї кімнати, якщо на 1 метр квадратний витрачається 0,25 кг фарби?

function max (x,y : longint) : longint; begin  if x> y then max: =x else max: =y; end; var k : longint; s : string; begin  readln(s);   while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do

begin    k: =k+1;

    delete(s,max(max(pos('.',s),pos('! ',('? ',); end;   writeln(k); end.

в системе ascii 1 символ кодируется 1 байтом, в юникоде 2 (ну так, к слову)

текст наш состоит из 30 символов (пробелы и знаки припинания тоже считаем), значит он занимает 30 байт = 240 бит

51 в десятой сс=110011 в двоичной сс

85 в дес сс=1010101 в двоичной сс

110011+1010101=10001000

110011-1010101=1111111111011110

вроде так

если ответ нужен в десятичной сс, то просто переведи

program mdd; uses crt; var i: longint; beginclrscr; for i: = 10 to 99 dobeginif i mod 13 = 0 then writeln(i); end; readkey; end.