Есть ответ 👍

Решите , надоо) вывести на экран все степени числа а начиная от 1 до б ,а и б вводятся клавиатурой . буду

259
269
Посмотреть ответы 3

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

tania071168
4,4(26 оценок)

Pascal   var    a,b,i,r : integer;       begin  readln (a,b);   r : = 1;   for i : = 1 to b do   begin      r: = r * a;     writeln (a,'^',i,'=',r);   end;     end.

Var a,b,i,j,c: integer; begin   writeln('vvedite a: ');   readln(a);   writeln('vvedite b: ');   readln(b);   writeln('stepeni chisla: ',a);   for i: =1 to b do   begin   c: =1;   for j: =1 to i do   c: =c*a;   writeln(c);   end;   end.

Program abc; var a,b,c,t,z: integer; m,k,l: string; label 1,2,3,4; begin writeln ('введите число от 1-го до 100'); repeat read(a) until (a> =0)and(a< =100); b: =a div 10; c: =a mod 10; if a=100 then goto 2; if a=0 then goto 1; if (a> 9) and (a< 20) then goto 4; case b of 2: m: ='двадцать '; 3: m: ='тридцать '; 4: m: ='сорок '; 5: m: ='пятьдесят '; 6: m: ='шестдесят '; 7: m: ='семдесят '; 8: m: ='восемьдесят '; 9: m: ='девяносто '; end; case c of 1: k: ='один'; 2: k: ='два'; 3: k: ='три'; 4: k: ='четыре'; 5: k: ='пять'; 6: k: ='шесть'; 7: k: ='семь'; 8: k: ='восемь'; 9: k: ='девять'; end; writeln (m,k); goto 3; 2: writeln ('сто'); goto 3; 1: writeln ('ноль'); goto 3; 4: if a=10 then writeln ('десять'); if a=11 then writeln ('одиннадцать'); if a=12 then writeln ('двенадцать'); if a=13 then writeln ('тринадцать'); if a=14 then writeln ('четырнадцать'); if a=15 then writeln ('пятьнадцать'); if a=16 then writeln ('шестнадцать'); if a=17 then writeln ('семнадцать'); if a=18 then writeln ('восемнадцать'); if a=19 then writeln ('девятнадцать'); 3: end.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS