1) 0(False, ложь)
2)1(True, правда)
Смех улыбку пазетив и тд и тп =)))
Const n=10;
var a:array[1..n] of real;
i:integer;
b:boolean;
begin
Randomize;
for i:=1 to n do
begin
a[i]:=10*random;
write(a[i]:5:1);
end;
writeln;
b:=true;
for i:=1 to n-1 do
if a[i]>=a[i+1] then b:=false;
if b
then writeln('Последовательность возрастающая')
else writeln('Последовательность не возрастающая');
end.
Пример:
5.3 1.4 0.2 6.1 5.7 0.8 3.4 6.2 6.2 8.4
Последовательность не возрастающая
Порядок букв в таблицах можешь расставить как тебе удобно.
Удачи!
Цикл foreach - это сокращенная запись цикла for. По сути здесь нет никаких различий, цикл foreach выполняет всё то, что и for, но без итераторов, инкремента и декремента - в этом и особенность foreach.
- foreach(char Symbol in Word){
- Console.WriteLine("{0}", Symbol);
- }
Word здесь может выступать коллекцией или массивом или другим объектом, содержащим множество элементов.