Информатика | 5 - 9 классы
Pascal.
ABC Дано случайное количество чисел, узнать сколько совершенных чисел в этом ряду (написать программу).
Напишите программу для вычисления суммы четырёх чисел(Pascal ABC)?
Напишите программу для вычисления суммы четырёх чисел(Pascal ABC).
Помогите пожалуйста составить программу на языке Pascal?
Помогите пожалуйста составить программу на языке Pascal!
Даны три числа, написать программу, подсчитывающую количество чисел, равных нулю.
Здравствуйте?
Здравствуйте!
Помогите, пожалуйста, решить задачу по информатике в программе pascal ABC!
Надо записать в файл 100 случайных чисел и посчитать сколько среди них нулей!
Пожалуйста!
Написать программу для Pascal ABC?
Написать программу для Pascal ABC.
Дан массив действительных чисел, размерность которого N.
Подсчитать, сколькоив нем отрицательных, положительных и нулевых элементов.
Задача в Pascal abc?
Задача в Pascal abc.
Cоздать программу и подсчитать количество двузначных чисел, которые кратны 3.
Дана строка ?
Дана строка .
Написать программу, которая подсчитывает количество символов "?
" (pascal abc) помогите пожалуйста!
Помогите пожалуйста решить программу ?
Помогите пожалуйста решить программу !
На Pascal ABC.
Задача : Найти количество четных чисел из 20 целых случайных чисел из любого интервала.
Дан ряд чисел 1, 3, 5, 7?
Дан ряд чисел 1, 3, 5, 7.
Найти среднее арифметическое первых n чисел и максимальный элемент)
написать программу на языке Pascal.
Составить программу для нахождения количества таких трехзначных чисел Фибоначчи, которые делятся на сумму своих цифр нацело?
Составить программу для нахождения количества таких трехзначных чисел Фибоначчи, которые делятся на сумму своих цифр нацело.
Программа - Pascal ABC.
Разработать программу на языке программированияTurbo Pascal :В массиве хранится 10 случайных чисел в интервале[ - 1, 1]?
Разработать программу на языке программированияTurbo Pascal :
В массиве хранится 10 случайных чисел в интервале[ - 1, 1].
Найти количество положительных и отрицательных чисел.
Определить, во сколько суммарное количество положительных чисел превышает отрицательных.
На этой странице вы найдете ответ на вопрос Pascal?. Вопрос соответствует категории Информатика и уровню подготовки учащихся 5 - 9 классов классов. Если ответ полностью не удовлетворяет критериям поиска, ниже можно ознакомиться с вариантами ответов других посетителей страницы или обсудить с ними интересующую тему. Здесь также можно воспользоваться «умным поиском», который покажет аналогичные вопросы в этой категории. Если ни один из предложенных ответов не подходит, попробуйте самостоятельно сформулировать вопрос иначе, нажав кнопку вверху страницы.
Var i, k, n, a, sum, kol : Integer ;
Begin readln(n) ; kol : = 0 ; for k : = 1 to n do begin sum : = 0 ; read(a) ; for i : = 1 to a - 1 do if a mod i = 0 then sum : = sum + i ; if sum = a then kol : = kol + 1 ; end ; writeln(kol) ;
End.