сервис вопросов и ответовлюди помогите!!! в паскале при помощи while .дано натуральное число n<10 прибавлять к нему его первоначальный квадрат и выводить на экран результат
10-11 класс|
|
пока результат не станет большим 250
яя1такая
18 марта 2015 г., 3:43:09 (9 лет назад)
Deevars
18 марта 2015 г., 4:24:51 (9 лет назад)
var
n,k:integer;
begin
readln(n);
k:=n;
if n<10 then
begin
while k<250 do
begin
k:=k+(n*n);
writeln(k)
end;
end;
else writeln('введите другое число');
end.
это черновой вариант,в нем много ошибок, но я думаю ход моих мыслей понятен)
RVS16
18 марта 2015 г., 5:46:43 (9 лет назад)
var n,k:integer;
Begin
read(n);
k:=n;
while (k+n*n<250) do begin
k:=k+n*n;
writeln(k);
end
End.
Ответить
Другие вопросы из категории
Задача:
Составить программу расчёта числа загонов (шт.) на пастбище по формуле:
Читайте также
1.Дано натуральное число:
a) найти произведение цифр числа б) верно ли, что в данном числе нет данной цифры А (цифру А вводить с клавиатуры)
2. Найти все трехзначные числа, которые при увеличении на 1 делятся на 2, при увеличении на 2 делятся на 3, при увеличении на 3 делятся на 4, а при увеличении на 4 делятся на 5.
3.Из данного натурального числа удалить все цифры А (а вводятся с клавиатуры).
Написать программы в паскале и желательно блок-схему, но можно и без нее.
Помогите пожалуйста)
Помогите пожалуйста решить 1) дано натуральное число. Определить номер цифры 3 в нем считая от конца числа. Если такой цифры нет то ответ
0,если их несколько то номер крайней правой.
2) Дано натуральное число. Определить сумму m его последних цифр
3)Дано натуральное число. определить его максимальную цифру.
4) дано предложение. заменить в нем все вхождения под строку str1 на подстроку str2
5) последовательность чисел Фибоначчи образуется так: первый и второй член последовательности равен 1, каждый следующий равен сумме двух предыдущих(1,1,2,3,5,,8,12..) Дано натуральное число n>=3 : а) найти k-й член последовательности б)получить первые n членов последовательности в)для заданного n определить верно ли,что сумма первых n членов есть четное число
1)Найти сумму 1/2+1/4+1/6...1/20 на паскале с помощью while и точно такую же задачу с циклом for
2)Возведение степени a в степень n, с помощью while
1.дано натурально четырехзначное число. определить цифры этого числа (K,L.M.N) и выяснить можно ли построить ромб со сторонами K,L.M.N.в паскале АВС.
2.дано натурально число N вычислить куб суммы этого числа
Вы находитесь на странице вопроса "люди помогите!!! в паскале при помощи while .дано натуральное число n<10 прибавлять к нему его первоначальный квадрат и выводить на экран результат", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.