Конечно, мог.
Если самая прекрасная Афродита, то она сказала правду.
Афина, сказавшая что она самая прекрасная солгала.
Солгала и Гера в обоих высказываниях, утверждая, что Афродита не самая прекрасная и что самая прекрасная сама Гера.
Тут нет противоречий.
Var
ar:array[1..2000] of integer;
n,i,count:integer;
begin
readln(n);
for i:=1 to n do begin
read(ar[i]);
while ((ar[i]>0) and ((ar[i] mod 10)<>4)) do ar[i]:=ar[i] div 10;
if ar[i] mod 10 = 4 then inc(count);
end;
writeln(count);
end.
Запиши последовательность которая превратит число 27 в 5
1 - разделить на 2
2 - вычесть 1
27-1=26(2)
26/2=13(1)
13-1=12(2)
12/2=6(1)
6-1=5(2)
Ответ:21212
Program p1;
var a,b,c,d : integer;
begin
writeln('vvedite a,b,c,d');
readln(a,b,c,d);
if (a*b)>(c*d) then writeln(a*b) else (c*d);
end.