Информатика | 5 - 9 классы
Дана последовательность целых чисел, оканчивающаяся числом 100.
Определить, есть ли в последовательности число 77.
Если такое число есть, то вывести «Yes».
В противном случае вывести «No».
Решить данную задачу двумя способами, используя циклы с пред и пост условиями.
( в ПАСКАЛЕ).
Дано трехзначное число?
Дано трехзначное число.
Вывести «Yes», если его цифры образуют возрастающую или убывающую последовательность.
В противном случае вывести «No».
Помогите решить задачу?
Помогите решить задачу!
Даны два целых числа а и б (а< ; б) вывести на экран все целые числа расположенные между данными числами ( не включая эти числа , в порядке их убывания, а так же количество этих чисел.
(Паскаль цикл с предусловием).
Решите задачу в Паскале?
Решите задачу в Паскале.
Если можно с блок - схемой.
Дана последовательность чисел.
Вывести на экран все отрицательные числа.
Даны три числа, если хотя бы одно из чисел больше 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 классов. В комментариях, оставленных ниже, ознакомьтесь с вариантами ответов посетителей страницы. С ними можно обсудить тему вопроса в режиме on-line. Если ни один из предложенных ответов не устраивает, сформулируйте новый вопрос в поисковой строке, расположенной вверху, и нажмите кнопку.
1)Первыйспособ :
program one ;
var a, b : integer ;
begin
b : = 0 ;
readln(a) ;
while a< ; > ; 100 do
begin
if a = 77 then
begin
b : = b + 1 ;
readln(a) ;
end
else readln(a) ;
end ;
if b> ; 0 then writeln('Yes')
else writeln('No') ;
end.
2)Второйспособ :
program one ;
var a, b : integer ;
begin
b : = 0 ;
repeat
readln(a) ;
if a = 77 then b : = b + 1 ;
until a = 100 ;
if b> ; 0 then writeln('Yes')
else writeln('No') ;
end.