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
Pascal:
type
cl=class
public
children:integer;
f:integer;
ff:integer;
end;
var
c:cl;
begin
c:=new cl;
writeln('Введите кол-во учеников: ');
read(c.children);
writeln('Введите кол-во стульев: ');
read(c.f);
if c.children>c.f then
begin
writeln('Некорректное значение (учеников < стульев)');
Halt;
end;
c.ff:=c.f mod c.children;
writeln('Кол-во учеников: ',c.children);
writeln('Кол-во стульев: ',c.f);
writeln('Кол-во лишних стульев: ',c.ff);
end.
(Если учеников больше, чем стульев, программа закроется с уведомлением. Если учеников столько же, сколько и стульев или меньше, то напишет кол-во лишних стульев).
5.6000E+02 - 4.2000E+01 + 3.1300E+003 = 560 - 42 + 3130 = 3648
2^8=256 оттенков
=>Так как 7 бит недостаточно(128 оттенков), 8 бит.
Не знаю, что там за условно, но по форме можно разделить на текстовую, графическую и числовую