var
a: <em>real</em>;
h, m: <em>byte</em>;
begin
readln(a);
a := a * 6;
h := trunc(a / 60);
m := trunc(a - h * 60);
writeln(String.Format('{0}:{1}', h, m));
<span>end.</span>
Ответ:
a = float(input("Введите в каких единицах измерения будите вводить числа. 1 - килобайты, 2 - мегобайты, 3 - гигобайты... (терабайт, петабайт, эксабайт, зеттабайт, йоттобайт) "))
b = float(input("введите число "))
vid = float(input("введите в какие единицы хотите перевести число (см первую запись) "))
d = 1024**a * b
er = 1024**vid
print(d/er )
Объяснение:
сходство:
*текстовые редакторы
*позволяют проводить поиск/замену
*позволяют изменять масштаб отображения текста (в блокноте черех шрифт)
различие:
*ворд сохраняет оформление/форматирование, поддерживает разные форматы файлов
*ворд имеет дополнительные возможности (язык/статистика/таблицы/и много другого)
*ворд может работать с рисунками, гиперссылками и т. д.
Ответ:
program Loto;
var
L: array [1..50] of Integer;
a: array [1..3] of Integer;
i, j, n: Integer;
b: Boolean;
begin
for i := Low (L) to High (L) do
L [i] := i;
Randomize;
for i := 1 to 3 do begin
repeat
n := Random (51) + 1;
until L[n] <> 0;
a [i] := L [n];
L [n] := 0;
end;
for i := 1 to 3 do
Write (a [i], ' ');
ReadLn;
end
Объяснение:
сделана проверка чтобы 3 числа не совпадали друг с другом
1.Sqrt(Power(x,3)+ Power (3,x))
Sqr(cos(sqr(x)))
sqr(1+x)
(sqr(x)+3*c)/(2*x)
2.(-b+ \sqrt{ x^{2} } -4ac)/2a
a/b(c+d) -(a-b)/b/c+ 1* 10^{-8} - 8