!. Наберите и выполните программу в среде программирования Паскаль. В комментариях
вместо во запишите ответы на них. Результирующую программу отправьте учителю:
Var I, N, m: integer; //Что делает эта программа?
Begin
Readln(N); //Что вводим в этой строке и зачем? Как можно подсказать пользователю, что ввести?
Writeln(‘Таблица квадратов чисел от 1 до N’); //Сколько раз выполняется этот оператор?
For i:=1 to N do //Сколько раз выполнится цикл?
Begin //Зачем снова писать операторные скобки?
m:=iI;
Writeln(I, ‘ ‘,m); //Как по-другому оставить пробелы между столбиками?
End;
End.
2. Задание то же
Var n: integer; a:real; //Что делает эта программа? Почему a не может быть целым числом?
Begin
For n:=1 to 7 do //Сколько раз выполнится цикл?
Begin //Зачем снова писать операторные скобки?
a:=(nn+5)/(2n);//Запиши в тетрадь формулу последовательности в математической форме
Writeln(n:5, a:10:2); //Сколько знаков после запятой в значении переменной a? Почему? Что
значитa:10:2?
End;
End.
3. Задание то же
Var n: integer; a, S:real; //Что делает эта программа?
Begin
S:=0; //Зачем записывать в S ноль?
For n:=1 to 5 do //Сколько раз выполнится цикл?
Begin
a:= 5+nn/2*n;//Запиши в тетрадь формулу последовательности в математической форме
S:=S+a;//Что происходит в этой строке программы?
End;
Writeln(‘Сумма 5-ти элементов последовательности S=’,S:9:4); //Почему мы выводим результат
//после окончания цикла? Сколько чисел в ответе?
End.
4. Составь и выполни программу вычисления произведения элементов последовательности.
Формула последовательности – из задания №2.

200

357

Ответы на вопрос:

4,4(78 оценок)

ДЗ для ВЕРЫ ВИКТОРОВНЫ:

Объяснение:

Var I, N, m: integer;

{Выводит таблицу квадратов до N числа}

Begin

Readln(N); //Что вводим в этой строке и зачем? Как можно подсказать пользователю, что ввести?

{Вводим до какого числа нам нужно получить квадрат; Подсказать можно через WRITELN}

Writeln('Таблица квадратов чисел от 1 до N'); //Сколько раз выполняется этот оператор?

{Один раз}

For i:=1 to N do //Сколько раз выполнится цикл?

{N раз}

Begin //Зачем снова писать операторные скобки?

{Затем, что это цикл, который всегда обособляется и отделяет от остальных операторов}

m:=i*I;

Writeln(I,' ',m); //Как по-другому оставить пробелы между столбиками?

{Можно сделать так - Writeln(I:3,m:16);}

End;

End.

4,4(17 оценок)

// pascal abc.net var i : integer; begin while i < > 11 do begin writeln(7*i); inc(i); end; end.

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.