<span>Var a, b, c, p :longint;
begin
WriteLn('Введите первую сторону треугольника a');
readLn(a);
WriteLn('Введите вторую сторону треугольника b');
readLn(b);
writeLn('Введите третью сторону треугольника c');
readLn(c);
p:=(a+b+c);
writeLn('Периметр треугольника равен ', p);
end.</span>
Без операционной системы. Условно-бесплатные, пробные
<span>Задание 1:
s = input("Введите первое слово: ")
s1 = input("Введите второе слово: ")
print(s + ", " + s1)
Задание 2:
a = int(input("Введите число a "))
b = int(input("Введите число b "))
x = int(input("Введите число x "))
if a < x < b:
print(True)
else: print(False)</span>
Ответ:
23 9 3 24
влбаовоаталчлвдаььслсьвлсьальа