Правой кнопкой на Мой компьютер => Свойства => Оборудование => Диспетчер устройств =>
<span>=> Дисковые устройства => выбираешь диск который там есть двойным щелчком, и жмешь вкладки. Напр. сведения и выбираешь то что тебе надо. Если не то, попробуй задать вопрос по другому. </span>
В 7сс семь цифр: 0 1 2 3 4 5 6
в 9сс девять цифр: 0 1 2 3 4 5 6 7 8
<em>// PascalABC.NET 3.2, сборка 1389 от 01.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(15,-50,50); a.Println;
var k:=ReadInteger('k=');
a.Transform(b->b+k); a.Println;
end.
<u>Пример</u>
17 6 -14 24 -39 17 39 9 -19 -7 -25 18 -37 -32 -43
k= 13
30 19 -1 37 -26 30 52 22 -6 6 -12 31 -24 -19 -30
Program fff;
var c: Char; n, u, sum: Integer; begin write('Кол-во цифр для ввода: '); readln(n); for u := 1 to n do begin readln(c); sum := sum + Ord(c)-48; end; writeln('Кол-во введёных цифр = ', n); writeln('Сумма введёных цифр = ', sum);end.