Паскаль
Program time ;
Var t : Integer;
Begin
WriteLn ('Введите время');
ReadLn (t) ;
If (t>=0) and (t<6) then
WriteLn ('Ночь') ;
If (t>=6) and (t<12) then
WriteLn ('Утро') ;
If (t>=12) and (t<18) then
WriteLn ('День') ;
If (t>=18) and (t<24) then
WriteLn ('Вечер') ;
End.
Лайк кста
Var a, b, c, d, e: real;
begin
readln(a, b, c)
writeln(c*(a/b):0:3, ' руб.');
end.
У компа материнская плата у человека мозг,
У компа процессор у человека отдел мозга обрабатывающий информ.
У компа оперативная память у человека память сознательная
у компа тоководы у человека нервное волокна
у компа считывающее устройство у человека кора головного мозга
у компа жест.диск у человека память
Горький острый. теплый горячий.сухой влажный. я не я не знаю как то так