Дорожные знаки. На дороге
===== PascalABC.NET =====
begin
var (a, b) := ReadReal2('Введите два неотрицательных числа:');
if a = b then
Println('Введенные числа равны')
else
Println('Квадрат наибольшего:', Sqr(Max(a,b)),
' корень квадратный наименьшего:', Sqrt(Min(a,b)));
end.
Товар это все то што можно продать, продать можно то што хотят купить.
Информация это в том числе знания.
Знание как сделать то или другое, формулы сплавов стали, пропорции градиентов в еде или лекарствах, методы добывания ископаемых, методы очистки. Бесспорно все это можно продать и стоит порой больших денег, потому что на них можно заработать еще больше денег
Это один из примеров
Учеба стоит не дешево, а это ничто иное как процесс получения и усвоения знаний/информации
Стратегические потому <span>ч</span>то на основе информации строится стратегия дальнейших действий
Разделить число в двоичной по три цифры начиная с правого разряда.
Из 1010010 получится 1 010 010.
Потом заменяешь каждую тройку соответствующим числом восьмиричной системы.
0 - 000
1 - 001
2 - 010
3 - 011
4 - 100
5 - 101
6 - 110
7 - 111
Из числа 1010010 получаем число 122.
Var a:integer;
begin
repeat
// число, которое надо ввести - 47
writeln('Введите двузначное число');
readln(a);
until a<>47;
writeln('Введенное число ', a);
end.
