1)из слова алгоритмизация составить слова: алгоритм,ритм,гора,рация,зима 2)определить самое длинное из трёх введенных слов программа qbasic

118

396

Посмотреть ответы 2

Ответы на вопрос:

gfgfvfvfuelrjds

Информатика

4,8(78 оценок)

// вот тебе первая у меня qbasic не хочет с буквами дружить поэтому слово алгоритмизация написано транслитом algoritmizacia

clslet a$ = "algoritmizacia"print a$print (left$(a$, 8))print (mid$(a$, 5, 4))print (mid$(a$, 3, 3)) + (mid$(a$, 11, 1))print (mid$(a$, 5, 1)) + (right$(a$, 4))print (mid$(a$, 10, 1)) + (mid$(a$, 9, 1)) + (mid$(a$, 8, 1)) + (mid$(a$, 1, 1))end

// вторая

clsprint "vvedite 1 slovo "input a$print "vvedite 2 slovo "input b$print "vvedite 3 slovo "input c$x = len(a$)y = len(b$)z = len(c$)if (x > y) and (x > z) then print " pervoe slovo samoe dlinnoe"if (y > x) and (y > z) then print "vtoroe slovo samoe dlinnoe"if (z > x) and (z > y) then print "tretie slovo samoe dlinnoe"end