Информатика | 5 - 9 классы
Дана последовательность целых чисел, оканчивающаяся числом 100.
Определить, есть ли в последовательности число 77.
Если такое число есть, то вывести «Yes».
В противном случае вывести «No».
Решить данную задачу двумя способами, используя циклы с пред и пост условиями.
Дано трехзначное число?
Дано трехзначное число.
Вывести «Yes», если его цифры образуют возрастающую или убывающую последовательность.
В противном случае вывести «No».
Дано целое число?
Дано целое число.
Если оно является положительным, то прибавить к нему 1 ; в противном случае не изменятьего.
Вывести полученное число.
Решите задачу в Паскале?
Решите задачу в Паскале.
Если можно с блок - схемой.
Дана последовательность чисел.
Вывести на экран все отрицательные числа.
Даны три числа, если хотя бы одно из чисел больше 0, то вывести True , в противном случае False?
Даны три числа, если хотя бы одно из чисел больше 0, то вывести True , в противном случае False.
Вводится число А и 7 целых чисел, определить, каким по счету в последовательности будет число а , если его нет, то вывести ноль решите пожалуйста способом паскаля?
Вводится число А и 7 целых чисел, определить, каким по счету в последовательности будет число а , если его нет, то вывести ноль решите пожалуйста способом паскаля.
Дана последовательность целых чисел, оканчивающаяся числом 100?
Дана последовательность целых чисел, оканчивающаяся числом 100.
Определить, есть ли в последовательности число 77.
Если такое число есть, то вывести «Yes».
В противном случае вывести «No».
Решить данную задачу двумя способами, используя циклы с пред и пост условиями.
( в ПАСКАЛЕ).
Дано целое число ?
Дано целое число .
Если оно является положительным, то умножить его на 3 ; в противном случае не изменять его.
Вывести полученное число.
Решите пожалуйста Абрамян М Э 1000 задачь на С + + Series22 Дано целое число N(больше 0) и набор на N вещественных чисел Если данный набор образует убываюшию последовательность то вывести 0 ; в против?
Решите пожалуйста Абрамян М Э 1000 задачь на С + + Series22 Дано целое число N(больше 0) и набор на N вещественных чисел Если данный набор образует убываюшию последовательность то вывести 0 ; в противном случае вывести номер первого числа нарушаюшую закономерность.
ДАМ 40?
ДАМ 40!
БАЛЛОВ!
ПОМОГИТЕ!
Написать программу, в которой вводится последовательность целых чисел, оканчивающаяся нулем (т.
Е. признак окончания ввода чисел в последовательности – ввод нуля).
Программа должна посчитать и вывести количество отрицательных чисел в этой последовательности.
Программу реализовать двумя способами : при помощи цикла с пред - и пост - условием.
Помогите решить задачу на c + + вот зададча Дана последовательность чисел, оканчивающаяся числом 1000?
Помогите решить задачу на c + + вот зададча Дана последовательность чисел, оканчивающаяся числом 1000.
Определите какое из чисел, оканчивающихся нулем, наибольшее в этой последовательности.
1000 элементом последовательности не считается.
Гарантируется, что хотя бы одно такое число в последовательности есть.
На странице вопроса Дана последовательность целых чисел, оканчивающаяся числом 100? из категории Информатика вы найдете ответ для уровня учащихся 5 - 9 классов. Если полученный ответ не устраивает и нужно расшить круг поиска, используйте удобную поисковую систему сайта. Можно также ознакомиться с похожими вопросами и ответами других пользователей в этой же категории или создать новый вопрос. Возможно, вам будет полезной информация, оставленная пользователями в комментариях, где можно обсудить тему с помощью обратной связи.
Program spos ;
uses crt ;
var
numb : array [1.
100] of byte ; / / для последовательности чисел
i, f : integer ; / / счетчик и переменная в качестве флага
begin
randomize ;
f : = 0 ;
for i : = 1 to 100 do numb[i] : = random(101) ; / / задает последовательность
for i : = 1 to 100 do
begin
write(', ', numb[i]) ; / / вывод на экран последовательность(можно удалить)
if (numb[i] = 77)then f : = 1 ; / / в случае удачной проверки f : = 1, в противном останется 0
end ;
if f = 0 then writeln('Yes') else writeln('No') ;
end.
Program spos ;
uses crt ;
var
numb : array [1.
100] of byte ; / / для последовательности чисел
i, f : integer ; / / счетчик и переменная в качестве флага
begin
randomize ;
f : = 0 ;
for i : = 1 to 100 do begin
numb[i] : = random(101) ; / / задает последовательность
write(' ', numb[i]) ; / / вывод на экран, можно удалить
end ;
writeln ;
i : = 0 ;
repeat
i : = i + 1 ;
if (numb[i] = 77)then f : = 1 ; / / в случае удачной проверки f : = 1, в противном останется 0
until i< ; 100 ;
if f = 0 then writeln('Yes') else writeln('No') ;
end.