Массив –
это группа однотипных элементов, имеющих общее имя и расположенных в памяти
рядом.
var A <span>: array[ 1 .. 5 ] of integer </span>
<span>A - имя массива</span>
<span>1 - начальный индекс</span>
<span>5 - конечный индекс</span>
<span>integer - тип элементов массива</span>
<span>
</span>
Это блок схема перевода числа из 10 формата в число с
основанием 2
<span>В приложении алгоритм на Excel VBA программу можно посмотреть Alt+F11
</span>
Var n: Word;
begin
write('Введите число ');
readln(n);
write((n mod 10 = 3) or (n div 10 mod 10 = 3) or (n div 100 = 3));
readln;
end.
Школьные Знания.com
Задай вопрос из школьного предмета
10 - 11 классы Информатика 5+3 б
Задача матрицы найти максимальный элемент матрицы 16 2 8 9 14 27 (М 6) необходимо решение и блок-схема
Попроси больше объяснений Следить Отметить нарушение Toma74 10.05.2014
Реклама
Ответы и объяснения
AdaLavleis
AdaLavleis Умный
Program Max_element_massiva ;
Var i, n, max : integer ;
A : array [1..100] of integer;
Begin Writeln('Введите количество элементов массива') ;
Readln(N) ;
Randomize;
For i := 1 to N do
begin A[i] := Random(100);
Write(A[i]);
end;
Max := A[1];
For i := 2 to N do
if A[i]>Max then Max := A[i];
Writeln('Максимальный Элемент массива = ',Max) ;
Readln ;
var
s:string;
begin
write ('Введите предложение: ');
readln(s);
if pos('с',s)>pos('т',s)
then writeln ('Буква «т» встречается раньше')
else writeln('Буква «с» встречается раньше');
end.