создайте информационную модель в текстовом редакторе ms-word Опишите алгоритм на языке программирования - id1374085320210428 от ardolg 28.04.2021 17:22

Question

Информатика: создайте информационную модель в текстовом редакторе ms-word Опишите алгоритм на языке программирования Паскаль​

ardolg · Accepted Answer

Программа.
var q,s:integer;
begin
s:=1;
for q:=1 to 365 do
s:=s+q;
Writeln(s);
end.

Описание программы.
var q,s:integer; // Объявление переменных, где q - цикл от 1 до 365, s - сумма результата.
begin // Начало выполнение программы.
s:=1; // Присваиваем переменной s значение 1, т.к. по условию 1 рубль.
for q:=1 to 365 do // Цикл от 1 до 365
s:=s+q; // Сумма цикла. То есть - Сумма = Сумма + Цикл с шагом 1. Начальное значение s равно 1, поэтому сумма считывается больше суммы предыдущего дня.
Writeln(s); // Вывод результата.
end. // Конец выполнение программы.

создайте информационную модель в текстовом редакторе ms-word Опишите алгоритм на языке программирования Паскаль​

MOGZ ответил

создайте информационную модель в текстовом редакторе ms-word Опишите алгоритм на языке программирования Паскаль