Алгоритмизация. 1. данытривещественныхчисла. выбратьтеизних, которыепринадлежатинтервалу [1,3] 2.найти сумму цифр трехзначного числа. определить, является ли сумма однозначным числом.

1)

program pr1;

var i: integer; n,n2,n3: real;

begin

for i: =1 to 3 do begin

  writeln('daite tzifru'); readln(n);

  if n in [1..3] then writeln('prenodlejit intervalu') esle writeln('ne prenodlejit intervalu');

  end;

readln;

end.

2)

program p2;

var i,c,cod,summa: integer; s: string;

begin

  writeln('daite tzivfru'); readln(s);

  for i: =1 to length(s) do

    begin

        val(s[i],c,cod); summa: =summa+c;

    end;

str(summa,s);

if length(s)> 1 then writeln('summa ne yavljaetsya odnoznachnim chislom: ',s) else

  writeln(summa  yavljaetsya odnoznachnim chislom: ',s);

readln;

end.

import random

list = []

maxValue = 0

for x in range(5):

   list.append(input(f"{x + 1} строка "))

for x in range(5):

   if(maxValue < len(list[x])):

       maxValue = len(list[x])

for x in range(5):

   space = " " * (maxValue - len(list[x]))

   list[x] = space + list[x] + f"{x} - пробелов: {(maxValue - len(list[x]))}"

for x in list:

   print(x)

minus = 0

plus = 0

index = 0

list = []

print("введіть массив елементів в такому вигляді: \n1 2 3 -1 -2 -3")

string = input()

for x in range(len(string)):

   if(string[x] == " " or x == len(string) - 1):

       list.append(int(string[index:x+1]))

       index = x + 1

for x in list:

   if(x < 0):

       minus +=1

   else:

       plus +=1

if(plus > minus):

   for x in range (plus - minus):

       list.append(random.randint(-999, -1))

else:

   for x in range(minus - plus):

       list.append(random.randint(1, 999))

for x in list:

   print(x)