Var a,b,c,d,m1,m2,max:integer;
begin
write('Введите a,b,c,d: ');
readln(a,b,c,d);
if a<b then m1:=a else m1:=b;
if c<d then m2:=c else m2:=d;
if m1<m2 then max:=m2 else max:=m1;
writeln('MAX=',max)
<span>end.</span>
1 Мбайт = 1024 Кбайт
0.3 Мбайт = 0.3*1024 Кбайт = 307.2 Кбайт
Нина - 23 апреля (если дети одногодки то тут какая-то ошибка, так как на Нину остаётся только 23 апреля, но она должна быть старше Коли, однако решение возможно если упущено условие что один из детей старше на год)
Маша - 21 марта
Коля - 23 марта
Таня - 19 мая
Петя - 4 мая
Есть текстовый файл, его размер 3,5 КБайта = 3,5*1024 = <span><span><span>
3584</span> байт
Если 1 байт равен одному символу, чаще всего именно так и обстоит, но бывает и иначе - то в этом тексте у нас будет </span></span><span><span><span>
3584</span> символов.</span></span>