1)4.75 - Это вещественное число, соответственно нужен тип данных REAL, а не Integer
2)
write (a) ---> 5
write ('a') ----> a
write ('a=a', a) ----> a=a5(такого нет среди предложенных)
Var n,a,h,m,s:integer;
begin
writeln('Введите кол-во дней');
read(n);
if n>1 then begin
writeln('В ', n ,' сутках:');
writeln(n*24,' часа');
writeln(n*24*60,' минут');
writeln(n*24*60*60,' секунд')
end;
if n=1 then begin
writeln('В ',n,' дне');
writeln(n*24,' часа');
writeln(n*24*60,' минут');
writeln(n*24*60*60,' секунд');
end;<span>
end.
</span>
C:\документы\учёба\диплом.doc
C:\документы\хобби\документ.xls
C:\документы\хобби\документ.txt
1) С моделью: управлять через пульт управления. С оригиналом: управлять, сидя в кабине пилота. С обоими: управлять полётом.
2) С моделью: обсуждать. С оригиналом: одеть. С обоими: узнать цвет куртки.
3) С моделью: изменять что-то в плане, чертить. С оригиналом: жить в квартире. С обоими: вычислить общую площадь квартиры.
4) С моделью: любоваться им, изменить форму. С оригиналом: кипятить в нём воду. С обоими: узнать объем вмещаемой жидкости.
5) С моделью: думать о ней, изменить представление. С оригиналом: быть уже в пути и ждать её завершения. С обоими: получать удовольствие.
Ощутить размер оригинала, потрогать, воспринять как что-то настоящее.