kristinmk
?>

Запишите значение переменной s, полученное в результате работы следующей программы. текст программы на трёх языках программирования. алгоритмический язык бейсик паскаль алг нач цел s, k s : = 0 нц для k от 13 до 16 s : = s + 14 кц вывод s кон dim k, s as integer s = 0 for к = 13 to 16 s = s + 14 next k print s var s, k: integer; begin s : = 0; for k : = 13 to 16 do s : = s + 14; writeln(s); end.

Информатика

Ответы

Pastushenkoen
ответ: 56. цикл выполнится 4 раза, а значит "s+14" повторится 4 раза
Сайжанов
А) Up & Down
б) IBM
в) Enter
15) а) Word           б) DOS                  в) Paintbrush
16) 5*30*70 = 10500 символов в тексте, так как каждый символ кодируется 1 байтом,  то объем будет равен = 10500  байтов
17) 32*64= 2048 символов на странице, т.к. 1 символ занимает 1 байт, то 1 страница занимает 2048 байтов = 2 Кб
640/2= 320 страниц книги поместится в оперативной памяти
18) 800*600= 480000 точек на экране дисплея
480000*24 =11520000 битов = 1440000 байтов = 1406 Кб требуется для хранения 1 страницы, тогда 1406*4 = 5624 Кб требуется для хранения 4 страниц изображения
elenak26038778

Б)

e = остаток деления на 10 => 8;

d = остаток от деления x/10 на 10 => 1258/10 = 125 => 125%10 = 5;

s = остаток от деления x/100 на 10 => 1258/100 = 12 => 12%10 = 2;

t = деление x на 1000 =>  1258 / 1000 = 1;

z = d*1000+t*100+s*10+e = 5*1000+1*100+2*10+8 = 5128;

Программа выведет: "z=5128".

В)

Объявление переменных m и n, равных 20 и 10 соотв.;

n присвается значение 2*m-n => 2*20-10 = 2*10 = 20

если m меньше или равно n, то:

   переменной p присваивается значение m+n => 20+10 = 30

иначе:

   переменной p присваивается значение 4-m*n => 4-20*10 = -196;

Программа выведет:

"n=30p=50"

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Запишите значение переменной s, полученное в результате работы следующей программы. текст программы на трёх языках программирования. алгоритмический язык бейсик паскаль алг нач цел s, k s : = 0 нц для k от 13 до 16 s : = s + 14 кц вывод s кон dim k, s as integer s = 0 for к = 13 to 16 s = s + 14 next k print s var s, k: integer; begin s : = 0; for k : = 13 to 16 do s : = s + 14; writeln(s); end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

zakupka-marion
peresvetoff100015
Filintver
Varagyant
Ka-shop2791
nataliagorki476
treneva359
sergey3699
Александра-Андрей909
nikitamihailov22095010
siger06297
gorushko-tabak3
tanyamurashova11352
julkamysh9
andrewa