Памагите ,надо это сдть 1. Приближенное значение х = 1,368 имеет абсолютную погрешность x = 0,03. Определить относительную погрешность х и верные в широком смысле цифры числа х.

2. Округлить число 2,3854 до трёх значащих цифр и найти абсолютные и относительные значения погрешности результата округления.

3. У приближенных чисел а = 1,356 и b = 1,3655 все значащие цифры верные в узком смысле. Найти разность этих чисел, предельную абсолютную и относительную погрешности.

4. Найти плотность тела, абсолютную и относительную погрешности результата, если его масса равна 353,238 кг, а объем – 2,371 м3 (все цифры в числах верные в широком смысле).

5. Округлите числа до сотых: 25,6589; 5,236; 1,845.

1) собирается - журналист опрашивает людей для статьи
2) обрабатывается - ученик решает уравнение
2) упрощается - преподователь объясняет материал 
3) создается - журналист придумывает статью
4) запоминается - парнень запоминает номер телефона девушки
5) измеряется - программист рассчитывает сколько бит займет 
программа
6) копируется - ученик списывает у одноклассника
7) передается - две девушки обмениваются новостями
8) принимается - ученики слушают учителя на уроке
9) разрушается - статья журналиста отвергается
10) делится на части - человек разбирает сообщение в котором 
пропущены пробелы
11) ищется - человек ищет материал для реферата в интернете

Var a: byte; b:integer;
Begin 
writeln('Введите день месяца');
readln(b);
writeln('Введите номер месяца');   
Readln(a);    
          Case a of        
1: writeln(b,' янавря');        
2: writeln(b,' февраля');      
3: writeln(b,' марта ');        
4: writeln(b,' апреля ');      
5: writeln(b,' мая');      
6: writeln(b,' июня ');        
7: writeln(b,' июля');       
8: writeln(b,' августа');     
9: writeln(b,' сентября');     
10: writeln(b,' октября');     
11: writeln(b,' ноября');       
12: writeln(b,' декабря');     
else writeln('Месяца №', a,'нет');   
end;       
end.