Регистрация
Mirajanesan
30.12.2020 09:12
Информатика
Есть ответ 👍

Дано число а и натуральное число n . напечатать на экране а в степени n ( паскаль цикл с предусловием)

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

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

guzel231299
guzel231299
4,4(17 оценок)

program p; var      a, n, i : integer;       s : integer; begin      s : = 1;       write('enter a ');       readln(a);             write('enter n ');       readln(n);       for i: =1 to n do            s : = s * a;       writeln('a ^ n = ', s);       readln; end.

2004Диана111111
2004Диана111111
4,4(71 оценок)
Program n1; var n,i,k,a: integer; begin k: =0; write('введите кол-во чисел: '); readln(n); for i: =1 to n do begin write('введите ',i,' число: '); readln(a); if a mod 2=0 then k: =k+1; end; writeln('кол-во четных: ',k); end.

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