1. Исправьте программный код.
IF PRINT ‘A>B’ THEN A>B;
Помагите

клинопись

алфавит из 33 букв это:

аа, бб, вв, гг, дд, ее, ёё, жж, зз, ии, , кк, лл, мм, нн, оо, пп, рр, сс, тт, уу, фф, хх, цц, чч, шш, щщ, ъъ, , , ээ, юю, яя

100010,011101=42,35   (вос. сис.)

10010,011101=22,1d   (шест. с.)

  111 111 111 000 001=77701(в.с)

  0111 1111 1100 0001(добавляем 0)=7fc1 (ш.с.)

0,000110101=0,065(в.с) (доб. 00)

0,0110101=0,35(ш.с.) 

0,11 100 110 101=0,3465(в.с.)

0,111 0011 0101=0,735(ш.с.) 

если есть д ш и в то это не куб а параллелипипед

var 

a,b,c,r: real;

begin

readln(a,b,c,r);

if (2*r< a) and (2*r< b) and  (2*r< c)

then writeln('поместится')

else writeln ('не поместится');

end.

для куба достаточно одного условия (2*r< a)