Массив предназначен для хранения значенийи ростов 12 человек . с датчика случайнях чисел заполнить массив значениями, лежащими в диапозоне от 163 до 190 включительно. вывести данный массив на экран.
111
455
Ответы на вопрос:
Var mass: array[1..12] of integer; i: integer; begin randomize; for i: =1 to 12 do begin mass[i]: =163+random(28); writeln('рост ',i,' =',mass[i]); end; end. пример работы: рост 1 =167 рост 2 =168 рост 3 =186 рост 4 =167 рост 5 =170 рост 6 =170 рост 7 =173 рост 8 =175 рост 9 =168 рост 10 =179 рост 11 =174 рост 12 =188
pascalabc.net
begin
var n : = readinteger('введи натуральное число: ');
var s : = 0;
while n > 0 do
begin
s += n mod 10;
n : = n div 10;
end;
if s > 10 then
println('да')
else
println('нет')
end.
Популярно: Информатика
-
dayanaazimbaevа18.02.2021 14:24
-
kapcha22803.08.2021 20:31
-
SeyshellaGoa10.02.2021 01:55
-
ZickAndRick04.04.2023 06:22
-
pomarinka111123.01.2021 00:23
-
mcghcnnbn25.07.2020 08:23
-
matany5726.07.2021 02:33
-
gaifuling4owmrcy24.01.2023 18:58
-
КилоЛеденцов07.03.2022 22:41
-
маркинала08.10.2021 05:09