Напишите эссе-рассуждение на тему ,,во всём виноваты мы? ! ​ по языку

с cd-r информацию нельзя удалить, можно только добавить. с cd-rw- можно удалить.

-,андрей!

-,паша!

-как у тебя дела?

-у меня всё хорошо,а ты как?

-у меня всё отлично. что спросил

-не за что.пойдёшь сегодня гулять?

-да,конечно.а во сколько?

-в 5 часов.

-хорошо.ладно пока.

пока.встретимся на улице

-хорошо.

иванов - парикмахер

петров - плотник

сидоров - мельник

гришин - почтальон

алексеев маляр

на паскале:

var

n,s,p: integer;

begin

read(n);

p: =n mod 10;

if p mod 2=0 then writeln ('оканчивается на четную цифру')

                    else writeln ('оканчивается на четную цифру');

while n> 0 do

begin

n: =n div 10;

s: =s+1;

end;

writeln ('количество цифр в числе', s);

end.