Коммуникационная среда - это совокупность условий, которая позволяет людям и <span>организациям</span><span> </span><span>обмениваться информацией путем прямого обращения друг к </span><span>другу.</span>
Я бы сделал так:
var a,a1,a2,a3,a4:integer;
begin
write ('Введите четырехзначное число: '); read (a);
a1:= a div 1000;
a2:= a div 100 mod 10;
a3:= a div 10 mod 10;
a4:= a mod 10;
writeln ('Первая цифра: ',a1);
writeln ('Вторая цифра: ',a2);
writeln ('Третья цифра: ',a3);
writeln ('Четвёртая цифра: ',a4);
<span>end.
<u>Этот вид более эстетичный</u> ;)
</span>
Это таблица перевода от 0 до F
Double kmh, ms;
// ввод или получение
//...
//приводим к одному измерению - к километрам в час
ms *= 3.6;
if (ms > kmh) printf("величина в метрах в секунду больше, чем в километрах в час");
else printf("величина в километрах в час больше, чем в метрах в секунду");
if (ms == kmh) // если равны допишешь если надо
1) 1100 = 48
2) 11100010.112<span> = 342.6</span><span>8</span>