Выведите на экран таблицу значений функции y=ax^2-b для х изменяющегося от -7 до +12 с шагом +1. значения а и b вводятся с клавиатуры.

у = ах2 – b для х изменяющегося от –7 до +12 с шагом +1.значения а и b ввести с клавиатуры.решить эту с использованием всехвидов циклов (for, while, repeat)}var a,b,x,y: integer; beginwriteln(',я alconafft'); writeln('введи заначения перeменных а и б'); writeln('введи значение а'); readln(a); writeln('введи значение b'); readln(b); writeln('хорошо,теперь протабулируем ф-цию на заданном отрезке,поехали))'); for x: =-7 to 12 do//парметрический циклbeginy: =a*x*2-b; writeln('значение у= ',y,' при х= ',x); end; writeln('--------------цикл с постусловием-----------'); x: =-7; repeatinc(x); y: =a*x*2-b; writeln('значение у= ',y,' при х= ',x); until(x=12); x: =-7; writeln('--------------цикл с предусловием-----------'); while x< 12 dobegininc(x); y: =a*x*2-b; writeln('значение у= ',y,' при х= ',x); end; end.

подробнее - на -

Using system; using system.collections.generic;                       public class program {     public static void main()     {         list< anotherclass> classes = new list< anotherclass> ();         for(int i = 0; i< 10; i++)             classes.add(new anotherclass(i));         foreach(anotherclass tmp in classes)             console.writeline(tmp.num);     } } public class anotherclass {     public anotherclass(int num)     {         this.num = num;     }     public readonly int num; }

// вот тебе первая у меня 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