<span>Sub Main()
Dim a, b, c As Integer
a = Int32.Parse(Console.ReadLine())
b = Int32.Parse(Console.ReadLine())
c = Int32.Parse(Console.ReadLine())
Console.WriteLine(IIf(a * b * c < 0, "-", "+"))
Console.Read()
<span>End Sub
</span>
Можно было и короче, но для школы так лучше) </span>
Амам-мама апап-папа околбя-яблоко и т.д.
While (условие) do
begin
(пишем что выполнить)
end;
идеи многих своих изобретений человек подглядел в природе.
Данные записанные в одну строку таблицы это - основы.