Менің болашақ компьютерім туралы эссе жазып беріңіздерші. 10 сойлем.

Мен жақында компьютер сатып аламын. болашақ компьютерімді ұқыпты əрі таза ұстап,керегіме ғана пайдаланамын. себебі,компьютерде ұзақ отыру - денсаулыққа,əсіресе,көзге өте зиянды. əлеуметтік желілерге еркін қосылу үшін де компьютердің көмегі зор. тек ретімен ,ережелерін сақтап қолдану керек.

программа на паскале:

program xxx;

  var i, n, s : integer;

begin

  write ('введите n =' );

  readln (n);

  s: =0;

  for i: =1 to n do

    s: = s+ sqr(i+1);

  writeln ('сумма =' , s);

  readln

end. 

на паскале:

 

program ostatok; var c: integer; beginwriteln('введите число с.'); readln(c); writeln('остаток от деления ',c,' на 10, возведенный в квадрат, равен ',sqr(c mod 10)); end.