Uses crt;
var
a,b,c:byte;
s,p:integer;
begin
clrscr;
write('a: ');readln(a);
write('b: ');readln(b);
write('c: ');readln(c);
p:=(a+b+c)/2;
s:=p*(p-a)(p-b)(p-c);
writeln(' площадь треугольника = ',s);
readln;
end.
p.s: писала без паскаля, ошибки не проверила)) но должно правильно решить:)
Я конечно могу ошибаться, но да именно позиционная и непозиционная, а у позиционных еще и основание системы счисления(то что пишетсяснизу справа от числа), именно оно и показывает предельно допутимое значение в данной системе счисления, к примеру в девятичной это число 8, а в троичной это число 2
//PascalABS.net
var count,a,b:integer;
begin
readln(b);
count:=1;
a:=2;
repeat
write(a:5);
a:=a+4;
count:=count+1;
until a>b;
writeln(a:5);
writeln('Номер следующего члена прогреммии ',count);
end.
B:=5.8
A:=-7.9
Сначала мы присваиваем значение A:=5.8 и B:=-7.9
Потом мы присваиваем значение B к A и A к B
1)Азбука морзе:
Информатика - ..-....-.- - - .-.- -.--..-.-.-
2)Таблица Юникод(Unicode):
Инофрматика : 0428 041D 0424 041E 0420 041C 0410 0422 0418 041A 0410
3) Кодовая Таблица Символов:
Информатика : 136 173 228 174 224 160 226 168 170 160