Var
k, p, s: integer;
begin
readln(k, p, s);
k := k * (100 + p);
writeln((100 * s) div k);
end.
Ответ:
program n1;
var time, seconds, minutes, hours: integear;
begin
readln(time);
seconds := time mod 60;
time := (time - seconds) / 60;
minutes := time mod 60;
time := (time - minutes) / 60;
hours := time;
writeln (hours, ' часов ', minutes, ' минут ', seconds, ' секунд');
end.
Объяснение:
Написано на языке Pascal
var
a,b,c:integer;
begin
readln(a); readln(b); readln(c);
if a mod 2 <> 0 then
Writeln('Первое нечетное')
else if a mod 2 = 0 then
Writeln('Первое четное');
if b mod 2 <> 0 then
Writeln('Второе нечетное')
else if b mod 2 = 0 then
Writeln('Второе четное');
if c mod 2 <> 0 then
Writeln('Третие нечетное')
else if c mod 2 = 0 then
Writeln('Третие четное');
end.
5! записывается как 120 (надо вычислять)
LXIV (римское) записывается как 64
11/4 записывается как 11/4 (деление), либо как результат 2.75
-1/6 записывается как -1/6 (деление), либо как результат с приемлемой точностью (-0.666...6)
√2 записывается как функция Sqrt(2), либо как результат с приемлемой точностью (1.4142135623730950488016887242...)
5·10⁶ записывается как 5e6
10⁶ записывается как 1e6
1/100000 записывается как 0.000001 или 1e-5