составьте программу для решения : дано натуральное число n. найти сумму s=1+1/2+1/3+ +1/n.

program raf105;

var

 n: integer;

 sum: real;

begin

 write('n = ');

 readln(n);

 for var i:=1 to n do

   sum:= sum + 1/i;

 writeln('Сумма: ',sum);

end.

PascalABC

Итак, уважаемые сидельцы за компьютером и смотрельцы в монитор, я продолжаю обобщать свой более чем десятилетний опыт подобного времяпрепровождения, стараясь объединить с еще не совсем забытым медицинским образованием и изложить в простой и понятной любому форме. Буду весьма признателен за любые, а особенно объективные дополнения и исправления, особенно от старшего поколения в подрастающему, чтобы у нашей смены не проваливалась грудь, не портилось зрение и не сводило пальцы. Словом, чтобы общение с железным другом было максимально безопасно для здоровья

Ақпарат (лат. informatio — түсіндіру, мазмұндау) ұғымы күнделікті өмірден бастап техникалық салада пайдаланылатын көп мағыналы ұғым. Жалпы алғанда бұл ұғым шектеу, байланыс, бақылау, форма, инструкция, білiм, мағына, құрылым, бейнелеу, сезіну тағы басқа ұғымдармен тығыз байланысты. Көп адам бұл жайлы Білім дәуірі немесе білім қоғамы тудырған Ақпарат дәуірі туралы айта бастады; ақпараттық қоғам, ақпараттық технологиялар, тіпті информатика, ақпарат ғылымы және компьютер ғылымы назарға көп түсуде, ал “ақпарат” сөзі білдіре бастаған мағыналары ұқыпсыз пайдаланылуда.