Var
a, b, c: real;
begin
write('Стороны треугольника: ');
read(a, b, c);
write('Площадь треугольника: ', sqrt((((a + b + c) / 2)) * (((a + b + c) / 2)-a) * (((a + b + c) / 2)-b)*(((a + b + c) / 2)-c)));
end.
var
num: integer;
begin
write('Введите двузначное число: ');
read(num);
write('Произведение чисел данного числа: ', (num MOD 10) * (((num MOD 100)-(num MOD 10)) / 10));
end.
IP-адрес - 4 числа в диапазоне от 0 до 255, разделенные точками:
[23][3.20][3.232][.33]
Г В Б А
<em>VAR</em>
<em> s: String;</em>
<em>BEGIN</em>
<em> s := Chr(66) + Chr(69) + Chr(71) + Chr(73) + Chr(78);</em>
<em> Write(s);</em>
<em>END.</em>
В класс персональных компьютеров входят различные машины — от дешёвых домашних и игровых с небольшой оперативной памятью, с памятью программы на кассетной ленте и обычным телевизором в качестве дисплея (80-е годы), до сверхсложных машин с мощным процессором, винчестерским накопителем ёмкостью в десятки Гигабайт, с цветными графическими устройствами высокого разрешения, средствами мультимедиа и другими дополнительными устройствами.
Что точно ты не можешь решить??