Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var i : integer;
a : array[1..15] of real; n : real; begin randomize; for i: =1 to 15 do a[i]: =random(20)-20;
writeln('исходный массив а: ');
for i: =1 to 15 do
write(a[i]);
n: =a[1];
a[1]: =a[15];
a[15]: =n;
writeln('полученный массив а: ');
readln
end.
program m;
uses crt;
var a,b,c,sum: integer;
begin
clrscr;
readln(a,b,c);
sum: =a+b+c;
writeln(' ',sum);
readkey;
восемь бит - как раз 256 ячеек
21 зависит от того чему равны в1 и а1
23 увижу этотт фрагмент - тогда скажу
24 аналогично 23
25 аналогично 23
26 сумм(в1: в3) = 3*3 = 9.
13-9 = 4
27 дайте таблицу тогда и видно будет
28 какого алгоритма?
Популярные вопросы