Вы бы отнесли компьютерные игры к приложениям общего или специального назначения? куда отнести программы переводчики? компьютерные словари и энциклопедии? обоснуйте свои ответы

приложения специального назначения - программы, которые используются профессионалами в какой-то узкой области.

программы общего назначения - все остальные.

компьютерные игры - общего

программы-переводчики - скорее специального, хотя ситуация меняется, и программами-переводчиками уже пользуются разные люди, а не только профессиональные переводчики.

словари, энциклопедии - общего

1.  алг нач   цел а   ввод а   вывод div(a, 1000), 'тонн' кон 2. var x, i: integer; begin write('введите трёхзначное число:   '); readln(x); if ( x  < 100  ) or ( x> 100 ) then writeln('число не трёхзначное! ') else begin i : =x mod 10; write(i) write(x div 100); write(x div 10 mod 10); end; end. 3.

было число ав

стало число 2ав2

разложим его на разряды

2ав2=2*1000+а*100+в*10+2=2002+100а+10в

по условию это в 32 раза больше исходного двузначного числа ав, т.е.:

32ав=2ав2  ( число ав тоже разложим на разряды, получим 10а+в)

32(10а+в)=2002+100а+10в

32(10а+в)=2002+10(10а+в)

32(10а+в)-10(10а+в)=2002

22(10а+в)=2002

10а+в=2002: 22

10а+в=91

итак, искомое число 91

//pascalabc.net 3.2 сборка 1318 var   x,x1,i: integer;   xs: string;   c: char; begin readln(x); xs: =inttostr(x); for i: =1 to length(xs) div 2 do   begin     c: =xs[i];     xs[i]: =xs[length(xs)-i+1];     xs[length(xs)-i+1]: =c;   end; x1: =strtoint(xs); if x1> x then writeln(x1,'> ',x) else   if x1< x then writeln(x,'> ',x1) else     writeln(x1,'=',x); end. пример ввода: 1230 пример вывода: 1230> 321