61

Заполните массив двадцатью первыми членами геометрической прогрессии…

karlson2la 05 марта 2023

Заполните массив двадцатью первыми членами геометрической прогрессии с известным первым членом прогрессии a и ее знаменателемz

категория: информатика

61

var a, z: real; X: array[1… 20] of real; i: integer; begin readln (a, z); X[1]: =a; for i: =2 to 20 do X[i]: =X[i-1]*z; for i: =1 to 20 do writeln (X[i]) end.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...