<span>C:/библиотека /повесть /летопись </span>
int a; // Определение переменной a целочисленного типа со значением, зависящим от местонахождения в памяти(мусор)
float b; // Определение переменной b вещественного типа со значением, зависящим от местонахождения в памяти(мусор)
double c = 14.2; // Определение переменной c вещественного типа со значением 14.2(вещественный тип)
char d = 's';// Определение переменной d символьного типа со значением символьного типа
bool k = true; Определение логической переменной k(булева типа/логического типа/etc.) со значением логическим.
Данная информация справедлива для C/C++.
Sub aaa()
Dim r As Range
Set r = Range(Cells(1, 1), Cells(9, 6))
Z = r
kn = 0: kp = 0
For Each a In Z
If a < 0 Then kn = kn + 1
If a > 0 Then kp = kp + 1
Next
Cells(12, 1) = "Положительных" + Str(kp)
Cells(13, 1) = "Отрицательных" + Str(kn)
End Sub
Во вложении рабочая книга MS Excel 2003
Var
a, b, c, d: integer;
begin
write ('Введите три числа: ');
readln (a, b, c);
if a >= b then
d := a
else
d := b;
if c > d then
d := c;
writeln ('Максимальное из них: ', d);
readln
end.