Напишите программу, которая вводит натуральные числа a и b , и выводит сумму квадратов натуральных чисел в диапазоне от a до b .
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters. Learn more about bidirectional Unicode characters
| # Функция вычисляет сумму квадратов натуральных чисел |
| # в диапазоне от a до b |
| def sum_of_squares(a, b): |
| # Переменная для хранения суммы квадратов |
| result = 0 |
| # Перебираем все целые числа от a до b |
| for i in range(a, b + 1): |
| # Увеличиваем сумму на квадрат текущего числа |
| result += i * i |
| return result |
| a = int(input()) # Считываем число a |
| b = int(input()) # Считываем число b |
| # Вычисляем сумму квадратов натуральных чисел |
| # в диапазоне от a до b |
| result = sum_of_squares(a, b) |
| print(result) # Выводим результат |
Математические выражения их запись в Паскале
Источник: gist.github.com
Паскаль написать программу которая выводит таблицу квадратов
Нажимая на кнопку «Задать вопрос», я даю согласие на обработку персональных данных
Задать вопрос
Задать вопрос
Паскаль. Написать программу которая выводит таблицу квадратов первых 5 четных чисел вводимых с клавиатуры
- 05 June 2013
- Ответ оставил: Саня76
var a:integer; k:integer;
begin
k:=0;
while k begin
write(‘a=’); read (a);
if (a mod 2=0) then
writeln(sqr(a));
k:=k+1;
end;
end.
Нравится —> 0
- НЕ НАШЛИ ОТВЕТ?
Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предмету школьной программы: қазақ тiлi.
На сегодняшний день (05.07.2023) наш сайт содержит 91805 вопросов, по теме: қазақ тiлi. Возможно среди них вы найдете подходящий ответ на свой вопрос.
Нажимая на кнопку «Ответить на вопрос», я даю согласие на обработку персональных данных
Ответить на вопрос
Последние опубликованные вопросы
Источник: vseznanija.com
Паскаль с нуля [ч5]. Математические функции. Простой калькулятор. От блок-схемы к программе
Задача № 3. Вывести на экран квадрат введенного числа
Формулировка. Дано натуральное число меньше 256. Сформировать число, представляющее собой его квадрат.
Решение. Для ввода числа нам необходима одна переменная. Обозначим эту переменную как a. Так как нам ничего не сообщается о необходимости сохранить исходное число, то для получения квадрата мы можем использовать ту же самую переменную, в которую считывали число с клавиатуры.
В условии задачи дается ограничитель величины вводимого числа – фраза «меньше 256». Это означает, что оно может быть охвачено типом byte. Но что произойдет, если в переменную a будет введено число 255, и затем мы попытаемся присвоить ей его квадрат, равный 65025?
Естественно, это вызовет переполнение типа данных, так как используемой для переменной a ячейки памяти не хватит для того, чтобы вместить число 65025. Значит, для ее описания мы должны использовать более емкий числовой тип. При этом типом минимальной размерности, охватывающим данный отрезок (от 1 (это 1 2 ) до 65025), является тип word. Его мы и будем использовать при описании a.
Далее нужно сформировать в переменной a квадрат. Для этого присвоим ей ее прежнее значение, умноженное само на себя:
Теперь остается вывести результат на экран. Для этого будем использовать оператор writeln.
Код:
| 1. program SqrOfNum; 2. 3. var 4. a: word; 5. 6. begin 7. readln(a); 8. a := a * a; 9. writeln(a) 10. end. |
Задача № 4. Получить реверсную запись трехзначного числа
Формулировка. Сформировать число, представляющее собой реверсную (обратную в порядке следования разрядов) запись заданного трехзначного числа. Например, для числа 341 таким будет 143.
Давайте разберемся с условием. В нашем случае с клавиатуры вводится некоторое трехзначное число (трехзначными называются числа, в записи которых три разряда (то есть три цифры), например: 115, 263, 749 и т. д.). Нам необходимо получить в некоторой переменной число, которое будет представлять собой реверсную запись введенного числа. Другими словами, нам нужно перевернуть введенное число «задом наперед», представить результат в некоторой переменной и вывести его на экран.
Решение. Определимся с выбором переменных и их количеством. Ясно, что одна переменная нужна для записи введенного числа с клавиатуры, мы обозначим ее как n. Так как нам нужно переставить разряды числа n в некотором порядке, следует для каждого из них также предусмотреть отдельные переменные. Обозначим их как a (для разряда единиц), b (для разряда десятков) и c (для разряда сотен).
Теперь можно начать запись самого алгоритма. Будем разбирать его поэтапно:
1) Вводим число n;
2) Работаем с разрядами числа n. Как известно, последний разряд любого числа в десятичной системе счисления – это остаток от деления этого числа на 10. В терминах языка Pascal это означает, что для получения разряда единиц нам необходимо присвоить переменной a остаток от деления числа n на 10. Этому шагу соответствует следующий оператор:
Получив разряд единиц, мы должны отбросить его, чтобы иметь возможность продолжить работу с разрядом десятков. Для этого разделим число n на 10. В терминах Pascal, опять же, это означает: присвоить переменной n результат от деления без остатка числа n на 10. Это мы сделаем с помощью оператора
3) Очевидно, что после выполнения п. 2 в переменной n будет храниться двухзначное число, состоящее из разряда сотен и разряда десятков исходного. Теперь, выполнив те же самые действия еще раз, мы получим разряд десятков исходного числа, но его уже нужно присваивать переменной b.
4) В результате в переменной n будет храниться однозначное число – разряд сотен исходного числа. Мы можем без дополнительных действий присвоить его переменной c.
5) Все полученные в переменных числа – однозначные. Теперь переменная n нам больше не нужна, и в ней нужно сформировать число-результат, в котором a будет находиться в разряде сотен, b – десятков, c – единиц. Легко понять, что для этого нам следует умножить a на 100, прибавить к полученному числу b, умноженное на 10 и c без изменения, и весь этот результат присвоить переменной c. Это можно записать так:
n := 100 * a + 10 * b + c;
6) Далее остается только вывести полученное число на экран.
Код:
| 1. program ReverseNum; 2. 3. var 4. n, a, b, c: word; 5. 6. begin 7. readln(n); 8. a := n mod 10; 9. n := n div 10; 10. b := n mod 10; 11. n := n div 10; 12. c := n; 13. n := 100 * a + 10 * b + c; 14. writeln(n) 15. end. |
Проверим работу программы на произвольном варианте введенных данных. Для этого выполним ее «ручную прокрутку», проделав с введенным числом те же действия, которые должен выполнить алгоритм.
Пусть пользователем введено число 514. Покажем в таблице, какие значения будут принимать переменные после выполнения соответствующих строк. При этом прочерк означает, что значение переменных на данном шаге не определено, а красным цветом выделены переменные, которые изменяются:
| № строки | n | a | b | c |
| 7 | 514 | — | — | — |
| 8 | 514 | 4 | — | — |
| 9 | 51 | 4 | — | — |
| 10 | 51 | 4 | 1 | — |
| 11 | 5 | 4 | 1 | — |
| 12 | 5 | 4 | 1 | 5 |
| 13 | 415 | 4 | 1 | 5 |
Нетрудно понять, что написанная программа будет выводить правильный ответ для любого заданного трехзначного числа, так как в соответствии с алгоритмом заполнение данной таблицы возможно лишь единственным образом. Это значит, что мы можем представить число в виде абстрактного трехзначного числа xyz, (в нем каждая буква должна быть заменена на любое число от 0 до 9, конечно, за исключением тех случаев, когда оно перестает быть трехзначным), и работая с разрядами этого числа, показать, что в результате работы ответом будет число zyx.
Дата добавления: 2018-10-25 ; просмотров: 1582 ; Мы поможем в написании вашей работы!
Источник: studopedia.net