var c, x: integer;
begin
read(c);
x := c div 100 mod 10 + 10 * (c div 1000) +
100 * (c mod 10) + 1000 * (c div 10 mod 10);
write(x)
<span>end.</span>
У компьютеров разная стоимость, потому что у каждого свои различные характеристики, от которых зависит работа самого устройства. Цена будет изменяться от того, что находится внутри компьютера. Например, есть устройства с небольшим размером памяти жёсткого диска-они стоят подешевле, те, у кого память побольше-дороже. Тоже самое можно сказать и от скорости работы самого компьютера, это зависит от того, какие «мозги» у устройства. Так же, цена может различаться от типа и емкости винчестера, если они высокие по своим значениям, то такие компьютеры будут лучше, а значит - дороже.
Подробнее - на Znanija.com -
znanija.com/task/29563570#readmore
Скорее всего, в задании требуется написать программу. На паскале это будет так:
var s:real; i:integer;
begin
s:=0;
for i:=1 to 10 do s:=s+cos(i);
writeln('s = ',s);
end.
Петр вася маша оля антон соня
иван ира аня катя
Првый компьютер вышел в 1958