← Программы обучения

Базовое программирование

Типы данных и операции

  1. Дана сторона квадрата a. Найти его периметр P = 4·a.
  2. Дана сторона квадрата a. Найти его площадь S = a2
  3. Даны стороны прямоугольника a и b. Найти его площадь S = a·b и периметр P = 2·(a + b).
  4. Дана длина ребра куба a. Найти объем куба V = a3 и площадь его поверхности S = 6·a2.
  5. Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = a·b·c и площадь поверхности S = 2·(a·b + b·c + a·c).
  6. Даны два числа a и b. Найти их среднее арифметическое: (a + b)/2. Найти их среднее геометрическое, то есть квадратный корень из их произведения: √(a*b)
  7. Дано трехзначное число. В нем зачеркнули первую справа цифру и приписали ее слева. Вывести полученное число.
  8. Дано трехзначное число. Вывести число, полученное при перестановке цифр сотен и десятков исходного числа (например, 123 перейдет в 213).
  9. Дано целое число, большее 999. Используя одну операцию деления нацело и одну операцию взятия остатка от деления, найти цифру, соответствующую разряду сотен в записи этого числа.

Условия

  1. Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае не изменять его. Вывести полученное число.
  2. Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 2; если нулевым, то заменить его на 10. Вывести полученное число.
  3. Даны три целых числа. Найти количество положительных и количество отрицательных чисел в исходном наборе.
  4. Дано целое число, лежащее в диапазоне 1–999. Вывести его строку-описание вида «четное двузначное число», «нечетное трехзначное число» и т. д.
  5. Даны три числа. Найти среднее из них (то есть число, расположенное между наименьшим и наибольшим).
  6. Даны три числа. Найти сумму двух наибольших из них.
  7. По числу а вывести |a| (модуль a).
  8. Решить уравнение ax+b=0.

Циклы

  1. Дано натуральное число N. Найти сумму 1 + 1/2 + 1/3 + … + 1/N
  2. Дано вещественное число A и целое число N (> 0). Используя один цикл, найти сумму 1 + A + A^2 + A^3 + ... + A^N.

Задачи с сайтов learnpascal.ru и ptaskbook.com