Ответы на вопрос:
uses crt; var a,s: real; i: integer; begin clrscr; randomize; s: =0; for i: =1 to 10 do begin a: =random(100)-50; s: =s+a; write(a,' '); end; writeln; write('summa=',s); end.
Популярно: Информатика
-
за 3 задания 1) Дана последовательность операторов : а:=1; b:=1; repeat a:= a+1;...
san4ez7724.07.2021 21:45 -
№ 4. Записать на языке Паскаль: 1) а = (b + с)2 2) а = b – с 3) а = b/c 4) а = bc...
milashenko00514.09.2020 08:49 -
Значение элементов массива А, состоящего из 10 элементов, равны соответственно:...
Zazasalka17422.07.2022 02:46 -
Компьютер подключенный к интернету обязательно имеет...
384839005.09.2020 06:52 -
Напишите программу вывода на экран фразы “число положительное”, если введенное число...
Error6922.10.2021 19:31 -
Написать программу в паскале я пытася неполучилось. составьте программу, которая...
lesenok27725.02.2021 01:35 -
Составить в pascal. среди корней уравнения cos(3,5x)sin(2x)cos(x/2)-0,1=0, принадлежащих...
Kristia0319.06.2021 04:53 -
Написать программу в паскале я пытался не получилось. имеется 2 коробки с конфетами....
nastya0201200720.07.2021 06:22 -
умоляюю надо решать в Пинтоне и отправьте мне скриншот на этот номер +996776100505...
AlexandrooParrol26.05.2023 22:37 -
В таблице приведены запросы к поисковому серверу. Для каждого запроса указан его...
пупсень611.09.2020 04:14