(x>0) and (x<5) это будет на языке паскаль
приготовление обеда - повар
уборка квартиры - уборщица
уборка мусора во дворе - дворник
стирка - прачка
перевозка пассажиров - таксист, водитель
обучение детец в школе - учитель
продажа железнодорожных билетов - продавец
поддержание температуры в помещении -
прием зачета -
доставка корреспонденции - курьер
1. объект- : платье 2. свойства: цвет,материал
Все просто. 113,87056 делите на 6, а потом еще раз на 2
Ответ: 9,48921335
Program n1;
Uses CRT;
Const n=20;
Var a: array[1..n] of integer;
i: integer;
begin
ClrScr;
Writeln('Vvedite massiv');
For i:=1 to n do
readln(a[i]);
For i:=1 to n do
If a[i]<0 then a[i]:=a[i]*(-5)
else if a[i]>0 then a[i]:=a[i]*20
else a[i]:=1000;
For i:=1 to n do
write(a[i]:5);
readln
end.