Информатика | 5 - 9 классы
Определите, что будет напечатано в результате работы следующей программы.
Текст программы приведен на трех языках программирования.
Алгоритмический язык Бейсик Паскаль
алг
нач цел s, k s : = 0 нц для k от 5 до 12 s : = s + 7 кц вывод s
кон DIM s, k AS INTEGER
s = 0
FOR k = 5 TO 12 s = s + 7
NEXT k
PRINT s
END var s, k : integer ;
begin s : = 0 ; for k : = 5 to 12 do s : = s + 7 ; write(s) ;
end.
Определите, какое число будет напечатано на экране в результате выполнения следующей программы :var a, b : integer ;begin a : = 0 ; b : = 2 ; while b < 32 do begin a : = a + 1 ; b : = b * 2 ; end ; wr?
Определите, какое число будет напечатано на экране в результате выполнения следующей программы :
var a, b : integer ;
begin a : = 0 ; b : = 2 ; while b < 32 do begin a : = a + 1 ; b : = b * 2 ; end ; writeln(a) ;
end.
Запишите значение переменной s, полученное в результате работы следующей программы?
Запишите значение переменной s, полученное в результате работы следующей программы.
Текст программы приведён на трёх языках программирования.
Помоги, срочно!
Помогите найти ошибку (Информатика, Паскаль)?
Помогите найти ошибку (Информатика, Паскаль).
Var s, k, a : integer ;
Begin
s : = 0 ;
k : = 0 ;
Read(a) ;
while a0 do
Begin
if a mod 8 = 0 then
Begin
s : = s + a ;
k : = k + 1 ;
end ;
Readln(a) ;
end ;
var y : real ;
begin
y : = s / k ;
Read(s) ;
if s>0 then
Writeln(y)
else
Writeln('NO')
end ;
end.
Определите число : которое будет напечатано в результате выполнения программы (с помощью языка программирования Паскаль)var n, s : integerbeginn : = 0 ;s : = 402 ;while s>0 dobegins : = s - 10 ;n : = ?
Определите число : которое будет напечатано в результате выполнения программы (с помощью языка программирования Паскаль)
var n, s : integer
begin
n : = 0 ;
s : = 402 ;
while s>0 do
begin
s : = s - 10 ;
n : = n + 3
end ;
write(n)
end.
Запишите значение переменной y, полученное в результате работы следующей программы?
Запишите значение переменной y, полученное в результате работы следующей программы.
Текст программы приведён на трёх языках программирования.
Var y, i : integer ;
Begin
y : = 5 ;
For i : = 1 to 3 do
y : = y + 5 * i ;
Writeln(y) ;
End.
СрочноProgram sredarifment ;Var a : array[1?
Срочно
Program sredarifment ;
Var a : array[1.
10] of real ;
i, k : integer ;
C, S, sred : real ;
Begin
For i : = 1 to 10 do begin write ('a[', i, '] = ') ; readln (a[i]) ; end ;
write('введите C : ') ; readln (C) ;
For i : = 1 to 10 do begin If a[i]>C then begin S = S + a[i] ; K = K + 1 ; end ; end ;
sred = S / k ;
Writeln('среднее арифметическое чисел, превосходящих ', C, ' равно ', sred) ;
End.
Помогите чтобы программа запускалась.
Выходит что не верно.
Срочно плзалгначцел s, ks : = 0нц для k от 8 до 12s : = s + 12кцвывод sкон?
Срочно плз
алг
нач
цел s, k
s : = 0
нц для k от 8 до 12
s : = s + 12
кц
вывод s
кон.
Переделать из программы Pascal в C#Задание : Шифр атбашconst s1 = 'ABCDEFGHIJKLMNOPQRSTUVWXYZабвгдеёжзийклмнопрстуфхцчшщъыьэюя' ; s2 = 'ZYXWVUTSRQPONMLKJIHGFEDCBAяюэьыъщшчцхфутсрпонмлкйизжедгвба' ;var?
Переделать из программы Pascal в C#
Задание : Шифр атбаш
const s1 = 'ABCDEFGHIJKLMNOPQRSTUVWXYZабвгдеёжзийклмнопрстуфхцчшщъыьэюя' ; s2 = 'ZYXWVUTSRQPONMLKJIHGFEDCBAяюэьыъщшчцхфутсрпонмлкйизжедгвба' ;
var i, p : integer ; s : string ;
begin Write('Введите текст : ') ; Readln(s) ; for i : = 1 to Length(s) do begin p : = Pos(s[i], s1) ; if p>0 then s[i] : = s2[p] end ; Writeln('Результат : ', s)
end.
Помогитттеееее срочно 13б?
Помогитттеееее срочно 13б!
1 Определить значение переменной S после выполнения следующих команд : S : = 1 ; n : = 3 ; for i : = 1 to n do s : = s + i * i.
2Что выведется на экран в результате выполнения фрагмента программы :
s : = 0 ;
for j : = 10 to 15 do begin s : = s + 2 * j ; write(s) end.
3 Что выведется на экран в результате выполнения фрагмента программы :
p : = 1 ;
for k : = 5 downto 1 do begin p : = p * k ; end ;
write(p).
Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на языке программирования ПаскальVar s, k, x : integer ;begins : = 1 ;x : = 2 ;for k : = 1 to 9 dos : = s * x?
Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на языке программирования Паскаль
Var s, k, x : integer ;
begin
s : = 1 ;
x : = 2 ;
for k : = 1 to 9 do
s : = s * x ;
writeln(s) ;
end.
Если вам необходимо получить ответ на вопрос Определите, что будет напечатано в результате работы следующей программы?, относящийся к уровню подготовки учащихся 5 - 9 классов, вы открыли нужную страницу. В категории Информатика вы также найдете ответы на похожие вопросы по интересующей теме, с помощью автоматического «умного» поиска. Если после ознакомления со всеми вариантами ответа у вас остались сомнения, или полученная информация не полностью освещает тематику, создайте свой вопрос с помощью кнопки, которая находится вверху страницы, или обсудите вопрос с посетителями этой страницы.
Цикл выполнится ровно 8 раз.
Программа выведет число 56.
1) k = 5 → s : = 0 + 7 = 7 ; 2) k = 6 → s : = 7 + 7 = 14 ; 3) k = 7 → s : = 14 + 7 = 21 ; 4) k = 8 → s : = 21 + 7 = 28 ; 5) k = 9 → s : = 28 + 7 = 35 ; 6) k = 10 → s : = 35 + 7 = 42 ; 7) k = 11 → s : = 42 + 7 = 49 ; 8) k = 12 → s : = 49 + 7 = 56 ; S = 56.