ТутРешу.Ру

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

Задание:

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

Решение:

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. Это черновой вариант, в нем много ошибок, но я думаю ход моих мыслей понятен)




Знаете другой ответ?

Отправить свой ответ