Регистрация
instajoha2p09254
04.02.2020 09:59
Информатика
Есть ответ 👍

Впаскале нужно найти сумму 10 случайных чисел в промежутке от 0 до 10 с reapit

172
447
Посмотреть ответы 2

Ответы на вопрос:

настя14о
настя14о
4,4(86 оценок)
Вот,только не reapit, а repeat program ex1; var a,z,l: integer; begin randomize; repeat;   a: =random(11); z: =z+a; l: =l+1; until l=10; write('ответ: ',z); end.
Sashapro111
Sashapro111
4,6(39 оценок)

//pascalabc.net 3.4.2

var

  n: biginteger;

  s: string;

begin

  read(s);

  n : = s.tobiginteger;

  write(sqr(n) - n + 1);

end.

//пример ввода

//4

//пример вывода

//13

//пример ввода

//462759159785241952916752967892695713792395

//пример вывода

//21414603996514309310315332548607182637508978065326333815975//4597242275715937446043631

Популярно: Информатика