Массив это можно сказать тоже самое что и переменная , но массив отличается от переменной тем , что если переменная хранит одно значение , то в свою очередь массив хранит несколько значений. Нужно из массива А вытащить значения, сравнить их if (первое значение) > (второго значегия) то выводишь первое значение , иначе выводишь второе значение , блин я в бэйсике 0, на pho пример :
<?php
$array = array(
"a" => "8",
"b" => "4"
);
If($array["a"] > $array["b"]){
echo array["a"];
else{echo array["b"];}
?>
Антон, Борис, Давид, Григорий Ольга ,Мария, Светлана, Екатерина
Норильск + - - - - - - +
Москва - - - + - + - -
Ростов - - + - - - + -
Пятигорск - + - - + - - -
=================================================================
Антон Екатерина Норильск
Борис Ольга Пятигорск
Давид Светлана Ростов
Григорий Мария Москва
Ответ:
Объяснение:
if mas[a]<=mas[min] then min:=a;
if mas[a]>=mas[max] then max:=a;
тут идет сравнение мас в номере ячейки А с массивом в номере ячейки min , если mas [ячейка а ] меньше mas[min] то их индексы меняется местами
if (a<>min)and(a<>max) then writeln (mas[a]);
Если индексы а не равен мин И индекс а не равен макс , то вывод на экран мас[а]
Var A,S:longint;
Begin
Write('Введите шестизначное число: ');ReadLn(A);
S:=A mod 10;
A:=A div 10;
S:=S+A mod 10;
A:=A div 10;
S:=S+A mod 10;
A:=A div 10;
A:=(A div 100)+(A div 10) mod 10 + (A mod 10);
if A<>S then Write('Билет не является счастливым')
else WriteLn('Счастливый билет!!!')
End.
Дания:) Написать в OnPaint
Canvas.FillRect(Rect(10, 10, 3 * 200 + 10, 2 * 200 + 10));
Canvas.Brush.Color := clWhite;
<span>Canvas.FillRect(Rect(140, 10, 190, 2 * 200 + 10));
</span>Canvas.FillRect(Rect(10, round(2 * 200 / 2) - 25, 3 * 200 + 10, round(2 * 200 / 2) + 25));