Как вывести на экран значение переменной но так чтоб её значение было слово которое присвоит себе переменная в дальнейшем
123
137
Ответы на вопрос:
2) const handsfree = true; var a: array[1..100] of real; i, n, mini: integer; begin {ввод массива} if handsfree then n : = random(27+27) -27 else begin write('n = '); readln(n); end; writeln('данные массива: '); for i : = 1 to n do begin if handsfree then begin a[i] : = random(100) - 50; write(a[i], ' '); end else readln(a[i]); end; writeln(); {минимум и максимум} mini : = 1; for i : = 1 to n do if a[mini] > a[i] then mini : = i; writeln('min = ', a[mini]); writeln('mini = ', mini); end. 1)const handsfree = false; var a: array[1..100] of real; i, n: integer; sum, product, harmonic: real; begin {ввод массива} if handsfree then n : = random(20) + 5 else begin write('n = '); readln(n); end; writeln('данные массива: '); for i : = 1 to n do begin if handsfree then begin a[i] : = random(100) - 50; write(a[i], ' '); end else readln(a[i]); end; writeln(); {подсчет суммы и произведения и агригатов} sum : = 0; for i : = 1 to n do if abs(a[i]) < = 5 then sum : = sum + a[i]; writeln('sum = ', sum); end.
Популярно: Информатика
-
Школьник543246720.04.2021 14:33
-
pra0224.05.2020 10:23
-
jusupova200129.04.2022 12:37
-
e12esa07.03.2023 03:53
-
Гулчехра102226.02.2021 10:34
-
ERAZOR07.04.2023 06:35
-
vladlukyanov114.11.2022 13:39
-
falinova0706.11.2022 21:39
-
masaberegovenko08.04.2021 21:38
-
nastasyasidork29.08.2021 21:01