Информатика | 10 - 11 классы
Ниже записана программа.
Получив на вход число x, эта программа печатает два числа, L и M.
Укажите наибольшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 8.
Var x, L, M : integer ; begin readln(x) ; L : = 0 ; M : = 0 ; while x> ; 0 do begin L : = L + 1 ; if (M< ; x) and (x mod 2 = 0) then begin M : = x mod 10 ; end ; x : = x div 10 ; end ; writeln(L) ; write(M) ; end.
Ниже записан алгоритм?
Ниже записан алгоритм.
Получив на вход число х, этот алгоритм печатает два числа L и M.
Укажите наибольшее из таких чисел х, при вводе которых алгоритм печатает сначала 3, а потом 120.
Var х, L, M : integer ;
begin
readln (x) ;
L : = 0 ; M : = 1 ;
while x> ; 0 do
begin
L : = L + 1 ;
M : = M * (x mod 8) ;
х : = x div 8 ;
end ;
writeln(L) ; write(M) ;
end.
Помогите пожалуйста)Желательно подробно?
Помогите пожалуйста)Желательно подробно.
Ниже записан алгоритм.
Получив на ход число x этот алгоритм , запишет две буквы M, L.
Напишите число “x” при котором алгоритм с начало напишет число 2, а потом 8 .
DIM X, L, M AS INTEGER INPUT X L = 0 : M = 0 WHILE X> ; 0 L = L + 1 IF M< ; (X MOD 10) THEN M = X MOD 10 END IF X = X \ 10 WEND PRINT L, M
в паскале :
var x, L, M : integer ;
begin readln(x) ;
L : = 0 ; M : = 0 ;
while x > ; 0 do
begin
L : = L + 1 ; if M < ; (x mod 10) then begin
M : = x mod 10 ;
end ;
x : = x div 10 ;
end ;
writeln(L) ;
write(M) ;
end.
Перевод программы с Pascal на QBasic Решение : var a, s : integer ; begin s : = 0 ; readln(a) ; while a< ; > ; 0 do begin if (a mod 6 = 0) and (a mod 10 = 4) then s : = s + a ; readln(a) ; end ; w?
Перевод программы с Pascal на QBasic Решение : var a, s : integer ; begin s : = 0 ; readln(a) ; while a< ; > ; 0 do begin if (a mod 6 = 0) and (a mod 10 = 4) then s : = s + a ; readln(a) ; end ; writeln(s) end.
ПОМОГИТЕ СРОЧНО?
ПОМОГИТЕ СРОЧНО!
Ниже написана программа.
Получив на вход число x, эта программа печатает два числа, a и b.
Укажите наибольшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 9.
ПОЖАЛУЙСТА С РЕШЕНИЕМ!
Var x, a, b : integer ; begin readln (x) ; a : = 0 ; b : = 1 ; while x > ; 0 do begin a : = a + 1 ; b : = b * (x mod 5) ; x : = x div 5 ; end ; writeln (a) ; write (b) ; end.
Пожалуйста, помогите?
Пожалуйста, помогите!
Не понимаю даже, как к заданию подступиться.
На языке программирования Паскаль написан текст программы.
Получив на вход число x, этот алгоритм печатает два числа a и b.
Укажите наименьшее из таких чисел x, при котрых алгоритм печатает сначала 3, а потом 7.
var x, a, b : integer ; begin readln(x) ; a : = 0 ; b : = 0 ; while x> ; 0 do begin a : = a + 1 ; b : = b + (x mod 10) ; x : = x div 10 ; end ; writeln(a) ; write(b) ; end.
56) Получив на вход число х, этот алгоритм печатает два числа a и b?
56) Получив на вход число х, этот алгоритм печатает два числа a и b.
Укажите наибольшее из таких чисел х, при вводе которых алгоритм печатает сначала 2, а потом 15.
Var x, a, b : integer ; begin readln(x) ; a : = 0 ; b : = 0 ; while x > ; 0 do begin a : = a + 1 ; b : = b + (x mod 100) ; x : = x div 100 ; end ; writeln(a) ; write(b) ; end.
Ниже записана программа?
Ниже записана программа.
Получив на вход число x, эта программа печатает два числа.
Укажите набольшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 24.
Var x, a, b : integer ; begin readln(x) ; a : = 0 ; b : = 1 ; while x > ; 0 do begin a : = a + 1 ; b : = b * (x mod 8) ; x : = x div 8 ; end ; writeln(a) ; write(b) ; end.
При каком наибольшем n программа выведет на экран сначала 2, а потом 12?
При каком наибольшем n программа выведет на экран сначала 2, а потом 12?
Var n, a, b, c : integer ; begin readln(n) ; a : = 0 ; b : = 0 ; while n > ; 0 do begin a : = a + 1 ; b : = b + (n mod 100) ; n : = n div 100 ; end ; writeln(a) ; write(b) ; end.
Укажите наибольшее х, при вводе которого алгоритм печатает сначала 3, а потом 4?
Укажите наибольшее х, при вводе которого алгоритм печатает сначала 3, а потом 4.
Var x, L, M : integer ; begin readln(x) ; L : = 0 ; M : = 0 ; while x> ; 0 do begin L : = L + 1 If M< ; (x mod 5) then Begin M : = x mod 5 End X : = x div 5 ; End.
Writeln (L) ; write(M) ; End.
Ниже записан алгоритм?
Ниже записан алгоритм.
Получив на вход число X, этот алгоритм печатает два числа : a и b.
Укажите наименьшее из таких чисел X при вводе которого алгоритм печатает сначала 15, а потом 7.
Паскаль var x, a, b, k : integer ; begin readln(x) ; a : = 0 ; b : = 10 ; while x> ; 0 do begin k : = x mod 10 ; a : = a + k ; If k< ; b : = k ; x : = x div 10 end ; writeln(a) ; writeln(b) ; end.
На этой странице сайта, в категории Информатика размещен ответ на вопрос Ниже записана программа?. По уровню сложности вопрос рассчитан на учащихся 10 - 11 классов. Чтобы получить дополнительную информацию по интересующей теме, воспользуйтесь автоматическим поиском в этой же категории, чтобы ознакомиться с ответами на похожие вопросы. В верхней части страницы расположена кнопка, с помощью которой можно сформулировать новый вопрос, который наиболее полно отвечает критериям поиска. Удобный интерфейс позволяет обсудить интересующую тему с посетителями в комментариях.
Число должно быть трехзначным и начинаться на 8.
Максимальное число при котором L = 3, а M = 8 будет 899
Ответ 899.