var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length(s); for i: =1 to n do begin
d: =d+k;
val(s,k,err);
end;
write (d);
end.
Ответ дал: Гость
program vvl;
var x: integer;
v: real;
begin
write('x=');
readln (x);
v: = abs(a)-2;
writeln ('v='; v: 2: 1);
end.
Ответ дал: Гость
залить в кувшин 3-х литровый воды до полна,перелить её в кувшин ёмкостью 8 литров.эту операцию проделать 3 раза,тогда в маленьком кувшине останется ровно литр воды.вылить всё из большого,залить туда воду из маленького(это 1 литр),затем залить в большой 3 маленьких и тогда получится 7 литров в большом кувшине.
Ответ дал: Гость
1-ый способ: 1 взрослый и 1 мальчик перебираются на другой берег реки, потом взрослый возвращается назад, и за тем он и второй мальчик перебираются на другой берег реки, потом один из мальчиков возвращается за вторым взрослым.
2-ой способ: или два мальчика сидят на плоту, а двое взрослых держатся за плот и перебираются на другой берег реки.
Популярные вопросы