М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
MaryWintlstone
MaryWintlstone
16.09.2020 13:14 •  Информатика

1определите, что будет напечатано в результате работы следующей программы var s, n: integer; begin s : = 0; for n : = 1 to 10 do s : = s + 9; write(s); end. 2 определите, что будет напечатано в результате работы следующей программы var m, n : integer; begin m : = 50; for n : = 1 to 7 do m : = m – 7; write(m); end. 3 определите, что будет напечатано в результате работы следующей программы var s, k: integer; begin s : = 0; for k : = 2 to 9 do s : = s + 2 * k; write(s); end. 4 определите значение переменной с после выполнения следующего фрагмента программы: a : = 30; b : = 6; a : = a / 2 * b; if a > b then c : = a - 12 * b else c : = a + 12 * b; 5 определите значение переменной а после выполнения данного алгоритма: a : = 5 с : = 3 с : = 7 + a * с a : = с / 2 * a

👇
Ответ:
marine25
marine25
16.09.2020

1. Программа 10 раз прибавляет 9 к нулю =>

s = 9 * 10 = 90

ответ: 90.

2. Программа 7 раз отнимает 7 от 50 =>

m = 50 - 7 * 7 = 1

ответ: 1.

3. Программа прибавляет удвоенный индекс цикла (от 2 до 9) к нулю

s = 2 * (2 + 3 + 4 + 5 + 6 + 7 + 8 + 9) = 88

ответ: 88.

4.

a = 30; b = 6

a = 30 / 2 * 6 = 15 * 6 = 90; b = 6

a > b = 90 > 6 = true =>

a = 90; c = 90 - 12 * 6 = 90 - 72 = 18

ответ: 18.

5.

a = 5; c = 3

a = 5; c = 7 + 5 * 3 = 7 + 15 = 22

a = 22 / 2 * 5 = 11 * 5 = 55; c = 22

ответ: 55.

4,7(55 оценок)
Открыть все ответы
Ответ:
ОК, всё это циклы.
1) Цикл for (цикл с счётчиком), при этом при каждом шаге цикла счётчик увеличивается на 1. Пример:
for a:=1 to 10 do //Цикл будет выполнен 10 раз
2) Цикл for (цикл с счётчиком), при этом при каждом шаге цикла счётчик уменьшается на 1. Пример:
for a:=10 to 1 do //Цикл будет выполнен 10 раз
3)Цикл с постусолвием. Если условие не выполняется, выполняется цикл. Его особенность заключается в том, что цикл выполнится хотя бы один раз вне зависимости от условия. Пример:
k:=0;
repeat
inc(k);
until k<9 //10 раз
4)Цикл с предусловием. Пока условие выполняется, выполняется и цикл.
Пример:
k:=0;
while k<>10 do
inc(k); //10 раз
4,7(99 оценок)
Ответ:
yulia6263
yulia6263
16.09.2020
{Данная программа переводит любое сочетание символов ASCII в систему счисления заданную пользователем.}

//Pascal ABC.NET v3.0 сборка 1111

var
 a,i,b,r,n,j,bug:integer;
 s,se,slo,slof:string;

procedure preob(var a,b,n:integer; var se:string);
 begin
  repeat
   b:=a mod n;
   a:=a div n;
   str(b,se);
   s+=se;
  until (a<=n-1);
 end;

beginreadln(slo);
readln(n);
for j:=1 to length(slo) do
begin;
a:=ord(slo[j]);
preob(a,b,n,se);
str(a,se);
s+=se;
for i:=1 to length(s) div 2 do
begin;
se:=s[i];
s[i]:=s[length(s)-i+1];
s[length(s)-i+1]:=se[1];
end;
write(s,'-');
slof:=slof+s;
delete(s,1,length(s));
end;
end.

Пример ввода:
Домашняя работа на завтра.
2
Пример вывода:
11000100-11101110-11101100-11100000-11111000-11101101-11111111-11111111-100000-11110000-11100000-11100001-11101110-11110010-11100000-100000-11101101-11100000-100000-11100111-11100000-11100010-11110010-11110000-11100000-101110-

{Таким образом, фразу "Домашняя работа на завтра." можно закодировать как "11000100-11101110-11101100-11100000-11111000-11101101-11111111-11111111-100000-11110000-11100000-11100001-11101110-11110010-11100000-100000-11101101-11100000-100000-11100111-11100000-11100010-11110010-11110000-11100000-101110-".}
4,4(47 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ