а после 18 какое число идет? ? если 108 ,то тогда получается так 2*3=6, 3*6=18, 6*18=108,получается что первое число умножается на второе,второе на третье,третье на четверное и т.д
Ответ дал: Гость
var
a,m,n,k: real;
begin
readln(m,n,k);
if (m+n+k)< (m*n*k) then
a: =m+n+k
else
a: =m*n*k;
writeln(a);
end.
Ответ дал: Гость
var s: string;
i,j,k: integer;
unique: boolean;
begin
for i : = 1000 to 9999 do
begin
s : = str(i);
unique: =true;
for j: = 1 to length(s)-1 do
for k : = j+1 to length(s) do
begin
if s[j] = s[k] then unique: =false;
end;
if unique then
writeln(i);
end;
end.
может длинее, но универсальное.
Ответ дал: Гость
ткань, глина, дерево, стекло, бумага, металл, пластмасса, резина, лед, фасфор, газ, вода из всего этого може быть сделана информацтонная модель.
Популярные вопросы