Const
USD=64.05; // Официальный курс доллара США к рублю на 08.07.2016
EUR=70.95; // Официальный курс евро к рублю на 08.07.2016
var
RUR:real; // сумма в российских рублях
begin
Writeln('Введите сумму в российских рублях: ');
Read(RUR);
Writeln('В долларах США: ',RUR/USD:0:2);
Writeln('В евро: ',RUR/EUR:0:2);
end.
<u><em>Тестовое решение:</em></u>
Введите сумму в российских рублях:
15200.76
В долларах США: 237.33
В евро: 214.25
Вариант с полным перебором. Решение в прикрепленном файле.
Входные данные:
4 63 4 1 34 1 3 22 3 4 31 2 3 41 3 2 42 1 4 3Выходные данные:
2 3 4 1
Var
n: int64;
function f(n: int64): int64;
begin
if(n > 0) then f := f(n div 10) + (n mod 10);
end;
begin
readln(n);
write(f(n));
end.
Сообщение, которое пополняет наши знания, называется информационным.Сообщения, которые не пополняют знания принимающего их человека, называются неинформа<span>циовным </span>сообщениями.