Rafigovich1267
Rafigovich1267
28.10.2022
?>

Рассмотрите блок схему и напишите программный код на языке программирования Pascal ​

Информатика
Ответить

Ответы

Ignateva737
Ignateva737
28.10.2022

var sum, m, k:integer;

begin

 sum := 0;

 m := 10;

 for k := 0 to 5 do begin

   sum := k+m;

   m := m-2;

 end;

 Writeln(sum);

end.

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

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

Рассмотрите блок схему и напишите программный код на языке программирования Pascal ​
Ваше имя (никнейм)*
Email*
Комментарий*

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

samogon-mozhaisk
сделать блок схему для Visual Basic Public Class Form1 Public Function fact(n As Integer) As Long Dim x As Integer, i As Integer x = 1 For i = 1 To n x *= i Next fact = x End Function Private Sub Tex...
Автор: samogon-mozhaisk
ПетросовичЗаславский
Сообщение занимает 3 страницы по 25 строк. в каждой строке записано по 60 символов. сколько символов в использованном алфавите если все сообщение содержит 1125 байтов?
Автор: ПетросовичЗаславский
kurmaleeva
Поменять местами элементы массива стоящие на чётных и нечетных местах (1и2, 3и 4 и тд) решить кумира
Автор: kurmaleeva
khadisovam9
Дана блок-схема. какое значение будет иметь z на выходе, если x=46 ?
Автор: khadisovam9
elena-ppk
с информатикой. дайте все ответы на все вопросы, поставлю 5звезд, назначу ваш ответ лучшим и подпишусь. кто будет писать ради того отмечу нарушением​
Автор: elena-ppk
Okunev1034
Дайте точный ответ. Сделайте кортеж (tuple) Со словом ИНФОРМАТИКА дам 20б.
Автор: Okunev1034
struev2003260
Дано трёхзначное число. напишите программу, которая определяет: а) есть ли среди цифр заданного целого трезначного числа одинаковые; пример входных данных выходных123. нет121. да222. да.б) является...
Автор: struev2003260
emmakazaryan290
Подсчитать сумму четных, не делящихся без остатка на 8 чисел от 5 до 75.по паскалю. надо, заранее : *
Автор: emmakazaryan290
topshopnails
Документ объёмом 5 Мбайт можно передать с одного компьютера на другой двумя : А) Сжать архиватором, передать архив по каналу связи, распаковатьБ) Передать по каналу связи без использования архиватор...
Автор: topshopnails
bergamon
ответьте №1 (написать номер верного варианта ответа) * Подпись отсутствует Это обязательный во написать номер верного варианта ответа) * Подпись отсутствует №3 (написать номер верного варианта отве...
Автор: bergamon
Antonov-Elena
I Примени на практикеПрактическое задание №1уа + 2b — Зc, если: a = 4; b = 3.5; c = 25а + bКод 1a = 4; b = 3.5; c = 2;тСоставь программу, в которой будет вычислено значение у:print((a + 2 + b – 3 + ...
Автор: Antonov-Elena
Борисович409
Рассчитайте объём видеопамяти, необходимой для хранения графического изображения, занимающего весь экран монитора с разрешением 512 х 368 и количеством отображаемых цветов, равным 128.
Автор: Борисович409
arbat
Найди закономерность и продолжите последовательности чисел а )1, 3, 5, 7 б)7, 11, 8, 12, 9.
Автор: arbat
konstantinslivkov
Что лишнее: 1) windows 2) mandriva 3) fedora 4) altlinux
Автор: konstantinslivkov
isaev
Қандай бағдарлама кодын қарастырғаннын жазыңыз: screen = pygame.display.set_mode((600, 500), 0, 32) pygame.display.set_caption("My First Game")
Автор: isaev
▲