96

Люди помогите! В паскале при помощи while . Дано натуральное число n

myrzilkin 01 апреля 2023

Люди помогите! В паскале при помощи while . Дано натуральное число n<10 прибавлять к нему его первоначальный квадрат и выводить на экран результатпока результат не станет большим 250

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

34

varn,k: integer; beginreadln (n); k: =n; if n<10 then beginwhile k<250 dobegink: =k+(n*n); writeln (k) end; end; else writeln ('введите другое число'); end. Это черновой вариант, в нем много ошибок, но я думаю ход моих мыслей понятен)

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

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

ПОПУЛЯРНОЕ
sany82, 01 апреля 2023
a: =1686; b: =(adiv10) mod 5; a: =a-200*b
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...