Var a, b, c, d: integer; begin writeln('Введите стороны 1 прямоугольника: '); readln(a, b); writeln('Введите стороны 2 прямоугольника: '); readln(c, d); if a*b > c*d then writeln('Площадь 1-го больше'); if a*b = c*d then writeln('Площади равны'); if a*b < c*d then writeln('Площадь 2-го больше'); end.
1. Процессор; 2. Тачпад; 3. Floppy disk; 4. Файл; 5. На тип данных, хранящихся в нем; 6. Презентация; 7. rtf, doc, docx, txt; 8. Служит для размещения данных и промежуточных результатов вычислений в процессе работы ПК, а также размещения программ; 9. Комплекс программ ПК, управляющих его работой и обеспечивающих эффективное использование ресурсов системы; 10. На системное, прикладное, системы программирования;
1. D:\HOME\HELP\readme.txt; 2. Ване не стоит брать диски 2 и 3, т.к.: -второй диск имеет частоту 2ГГц, превышающая тактовую частоту компьютера; -третий диск имеет больший объем ОП, чем его компьютер.
Перевод в 2-ричную систему счисления алгоритм, правило или просто мои проверенные познания: делим число из десятичной системы на 2 потом записываем частное и запоминаем для дальнейшего выведения остатка , если при делении делимое иррациональное то мы отнимаем 1 от делимого и делим на 2, при выведении остатка с рациональным числом мы просто вычитаем их и получаем остаток 0, но при выведении остатка с иррациональным числом мы берём обычное иррациональное уменьшаемое и рациональное вычитаемое (то есть отнимаем 1 от делимого которое в данном случае является уменьшаемым) и при таком раскладе остаток будет 1. то есть если число рациональное то остаток = 0 но если оно иррациональное то остаток = 1
прости но я потратил много времени что бы сформулировать правило ну и проверка это самое лёгкое что казалось, остальное всё исходит из 2-ричной системы счисления.
a, b, c, d: integer;
begin
writeln('Введите стороны 1 прямоугольника: ');
readln(a, b);
writeln('Введите стороны 2 прямоугольника: ');
readln(c, d);
if a*b > c*d then
writeln('Площадь 1-го больше');
if a*b = c*d then
writeln('Площади равны');
if a*b < c*d then
writeln('Площадь 2-го больше');
end.