Вариант №1.
Задание №1
Написать программу вычисления стоимости покупки с учетом скидки. Скидка 10% предоставляется, если сумма покупки больше 1000 руб.
Ниже представлен рекомендуемый вид экрана:
Вычисление стоимости покупки с учетом скидки.
Введите сумму покупки и нажмите Enter
пользователь вводит свое число, например, 1200
Вам предоставлена скидка 10%
Сумма покупки с учетом скидки: 1080.00 руб.
Решение:
вещ n
алг
нач
вывод "Вычисления стоимости покупки с учетом скидки "
вывод "Введите сумму покупки и нажмите "
ввод n
если n1000 то
вывод "Вам предоставлена скидка 10% "
n:=n-n*0.1
вывод "сумма покупки с учетом скидки: ", n, " руб."
иначе вывод "сумма покупки составляет ", n
все
кон
Задание №2
Написать программу, которая выводит на экран квадраты первых 10 целых положительных чисел.
Решение:
цел n, i
алг
нач
вывод "квадраты первых десяти целых положительных чисел "
нц для i от 1 до 10
n:=i*i
вывод n, " "
кц
кон
Задание №3 (использовать цикл при)
Написать программу, которая определяет максимальное число из введенных с клавиатуры чисел (до тех пор, пока не введут ноль).
Решение:
вещ k, t
алг
нач
вывод "определение максимального числа из введенных "
t:=0
нц
ввод k
если kt то t:=k все
кц при k=0
вывод "максимальное число ", t
кон
Задание №4 (использовать цикл пока)
Написать программу, вычисляющею сумму и среднее арифметическое последовательности положительных чисел, которые вводятся с клавиатуры (до тех пор, пока не введут ноль).
Решение:
цел sum, k, t
вещ srar
алг
нач
вывод "введите число "
ввод t
sum:=0
k:=1
нц пока t0
sum:=sum+t
ввод t
k:=k+1
кц
srar:=sum/k
вывод "сумма чисел: ", sum, " "
вывод "среднее арифметическое: ", srar
кон
Вариант №2.
Задание №1
Написать программу проверки знания даты основания Санкт-Петербурга. В случае неверного ответа пользователя программа должна выводить правильный ответ.
Ниже представлен рекомендуемый вид экрана:
В каком году был основан Санкт-Петербург?
Введите число и нажмите Enter
пользователь вводит свое число, например, 1700
Вы ошиблись, Санкт-Петербург был основан в 1703 году.
Решение:
цел k
алг
нач
вывод "В каком году был основан Санкт-Петербург? "
вывод "Введите сумму покупки и нажмите "
ввод k
если k=1703 то вывод "Вы ввели правильный год"
иначе вывод "Вы ошиблись, Санкт-Петербург был основан в 1703 году"
все
кон
Задание №2
Написать программу, которая 10 раз выводит на экран имя и фамилию.
Решение:
цел i
алг
нач
нц для i от 1 до 10
вывод "Фамилия Имя "
кц
кон
Задание №3 (использовать цикл при)
Написать программу, вычисляющею сумму и среднее арифметическое последовательности положительных чисел, которые вводятся с клавиатуры (до тех пор, пока не введут ноль).
Решение:
цел sum, k, t
вещ srar
алг
нач
вывод "введите число "
ввод t
sum:=0
k:=1
нц
sum:=sum+t
ввод t
k:=k+1
кц при t=0
srar:=sum/k
вывод "сумма чисел: ", sum, " "
вывод "среднее арифметическое: ", srar
кон
Задание №4 (использовать цикл пока)
Написать программу, которая определяет максимальное число из введенных с клавиатуры чисел (до тех пор, пока не введут ноль).
Решение:
вещ k, t
алг
нач
вывод "определение максимального числа из введенных "
t:=0
вывод "введите число "
ввод k
нц пока k0
ввод k
если kt то t:=k все
кц
вывод "максимальное число ", t
кон
Вариант №3.
Задание №1
Написать программу, которая проверяет, является ли четным введенное пользователем целое число.
Ниже представлен рекомендуемый вид экрана:
Введите целое число и нажмите Enter
пользователь вводит свое число, например, 23
Число 23 – нечетное.
Решение:
цел n
алг
нач
вывод "введите целое число и нажмите "
ввод n
если mod(n,2)=0 то вывод "число ", n, " четное"
иначе вывод "число ", n, " нечетное" все
кон
Задание №2
Написать программу, которая вычисляет факториал числа, введенного с клавиатуры (Факториал числа n – это произведение целых чисел от 1 до n).
Решение:
цел n, i, k
алг
нач
вывод "введите число "
ввод n
k:=1
нц для i от 2 до n
k:=k*i
кц
вывод "Факториал числа ", n, " равен ", k
кон
Задание №3 (использовать цикл при)
Написать программу, которая определяет минимальное число из введенных с клавиатуры чисел (до тех пор, пока не введут ноль).
Решение:
вещ k, t
алг
нач
вывод "определение минимального числа из введенных "
вывод "введите число "
ввод k
t:=k
нц
если k
ввод k
кц при k=0
вывод "минимальное число ", t
кон
Задание №4 (использовать цикл пока)
Написать программу, которая проверяет, является ли целое число, введенное с клавиатуры пользователем, простым.
Решение:
цел n, i, k, m
алг
нач
вывод "введите целое число и нажмите "
ввод n
k:=div(n,2)
i:=2
m:=1
нц пока i
если mod(n,i)=0 то m:=0 все
i:=i+1
кц
если m0 то вывод "число ", n, " простое" иначе вывод "число ", n, " составное" все
кон
Вариант №4.
Задание №1
Написать программу, которая проверяет, делиться на три целое число, введенное с клавиатуры.
Ниже представлен рекомендуемый вид экрана:
Введите целое число и нажмите Enter
пользователь вводит свое число, например, 451
Число 451 нацело на три не делиться.
Решение:
цел n
алг
нач
вывод "введите целое число и нажмите "
ввод n
если mod(n,3)=0 то вывод "число ", n, " делиться на три"
иначе вывод "число ", n, " не делиться на три" все
кон
Задание №2
Написать программу, которая выводит степени двойки (от нулевой до 10).
Решение:
цел n, i
алг
нач
нц для i от 0 до 10
n:=2**i
вывод n, " "
кц
кон
Задание №3 (использовать цикл при)
Написать программу, которая проверяет, является ли целое число, введенное с клавиатуры пользователем, простым.
Решение:
цел n, i, k, m
алг
нач
вывод "введите целое число и нажмите "
ввод n
k:=div(n,2)
i:=2
m:=1
нц
если mod(n,i)=0 то m:=0 все
i:=i+1
кц при ik
если m0 то вывод "число ", n, " простое" иначе вывод "число ", n, " составное" все
кон
Задание №4 (использовать цикл пока)
Написать программу, которая определяет минимальное число из введенных с клавиатуры чисел (до тех пор, пока не введут ноль).
Решение:
вещ k, t
алг
нач
вывод "определение минимального числа из введенных "
вывод "введите число "
ввод k
t:=k
нц пока k0
если k
ввод k
кц
вывод "минимальное число ", t
кон