1)Блок, на который рас описание программного объекта называется…2)С какого служебного слова программируется выход из подпрограммы? Если таких слов несколько, то укажите их строчными буквами, через пробел в алфавитном порядке.3)С какого служебного слова программируется выход из подпрограммы? Если таких слов несколько, то укажите их строчными буквами, через пробел в алфавитном порядке.4)Как называется прием структурированного программирования, при котором исходная задача разбивается на более с точки зрения программирования, части исходной задачи?5)По каким критериям должно быть соблюдено соответствие между фактическими и формальными параметрами при обращении к подпрограмме из программы?Выберите один или несколько ответов:a. по типамb. нет верного ответа c. по последовательностиd. по количеству6)Если программа – внешний блок, а подпрограмма – внутренний блок, то как называются переменные, указанные во внешнем блоке, и как называются те, что указаны во внутреннем? ответ запишите через пробел строчными буквами
Ответы
Если считать отрицательные трехзначные, то сумма таких чисел в диапазонах от -999 до -100 и от 100 до 999 будет равна 0. Для только положительных:
//c циклом for
var s,i:integer;
begin
for i:=100 to 999 do
if i mod 77 = 0 then s:=s+i;
writeln('Сумма трехзначных кратных 77: ',s);
end.
Тестовое решение:
Сумма трехзначных кратных 77: 5929
// с циклом while
var s,i:integer;
begin
i:=100;
while i<=999 do begin
if i mod 77 = 0 then s:=s+i;
i:=i+1;
end;
writeln('Сумма трехзначных кратных 77: ',s);
end.
//c циклом for
var s,i:integer;
begin
for i:=100 to 999 do
if i mod 77 = 0 then s:=s+i;
writeln('Сумма трехзначных кратных 77: ',s);
end.
Тестовое решение:
Сумма трехзначных кратных 77: 5929
// с циклом while
var s,i:integer;
begin
i:=100;
while i<=999 do begin
if i mod 77 = 0 then s:=s+i;
i:=i+1;
end;
writeln('Сумма трехзначных кратных 77: ',s);
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Как используемые при моделировании законы некоторой науки отражаются в названии модели
Автор: galustyanvitaly4842
Перечислите все известные вам способы копирования данных ( excel)
Автор: annarom1306
Вычислите: 11111111(2)(в двоичной ) – 377(8)( восьмиричной)+ 6(16)
Автор: peshnoshamon
Информатика, 8 класс С подробным решением
Автор: yfetyukov
m = 5;
var a:array[1..n,1..m] of integer;
i,j,s:integer;
begin
//Для теста заполним массив сл.числами
for i:=1 to n do begin
for j:=1 to m do begin
a[i,j]:=random(21)-10; write(a[i,j]:4);
end;
writeln;writeln;
end;
//сумма всех элементов массива
for i:=1 to n do
for j:=1 to m do s:=s+a[i,j];
writeln('сумма всех элементов массива: ',s);
//сумма каждой строки
for i:=1 to n do begin
s:=0;
for j:=1 to m do begin
s:=s+a[i,j];
end;
writeln ('Строка: ',i,' сумма:',s);
end;
end.