сравниваешь первую и вторую цифры
затем вторую и третью
затем первую и третью
если есть одинаковые то ДА
если нет то НЕТ
Не Паскаль!!!!
Задание полностью
Внимательно прочитай текст:
Все эти животные живут, дышат, едят. Все они дикие животные, все имеют хвосты. Это их общие свойства. У лисы и медведя лапы и когти. Они хищники. У слона и лося – ноги. Они травоядные животные. Лиса тявкает. Медведь рычит. У слона бивни и хобот, а у лося рога и копыта, которых нет ни у лисы, ни у медведя.
Заполни таблицу:
Общие свойства для всех объектов
живут, дышат, едят, дикие животные, имеют хвосты
Общие свойства для пар объектов
лиса+медведь - есть лапы, есть когти, хищники
слон+лось - ноги, травоядные
вполне реально, если в информатике ты владеешь языком Pascal на хорошем уровне
а общагу надо учить
выбор ВУЗа будет зависеть от желаемого профиля и сферы работы
Sub aaa()
Dim s As Double, r As Range
Set r = Range("C2:D8")
s = 0
For i = 1 To 7
s = s + r(i, 1) * r(i, 2)
Next i
Cells(9, 3) = s
End Sub
<u>Во вложении - файл с рабочей книгой Excel 2003</u>
Так воооооооооооооот
МОЩ Н ОСТЬ