Информатика | 5 - 9 классы
Написать программу на языке Pascal.
Написать программу, которая выводит 10 одинаковых чисел.
Помогите пожалуйста составить программу на языке Pascal?
Помогите пожалуйста составить программу на языке Pascal!
Даны три числа, написать программу, подсчитывающую количество чисел, равных нулю.
Pascal написать программу которая выводит все делители числа число вводится пользователем?
Pascal написать программу которая выводит все делители числа число вводится пользователем.
Написать программу, которая выводит произведение всех простых чисел от 1 до 24?
Написать программу, которая выводит произведение всех простых чисел от 1 до 24.
Написать программу которая выводит на экран максимальное из трех целых чисел?
Написать программу которая выводит на экран максимальное из трех целых чисел.
Написать программу выводо на экран элементов кратных числу 3 Pascal?
Написать программу выводо на экран элементов кратных числу 3 Pascal.
Написать программу, которая выводит изображенный ниже узор?
Написать программу, которая выводит изображенный ниже узор.
Turbo Pascal.
Написать программу, в которой пользователь вводит несколько чисел, программа выводит количество положительных чисел?
Написать программу, в которой пользователь вводит несколько чисел, программа выводит количество положительных чисел.
Написать программу, которая выводит максимальное из трех чисел?
Написать программу, которая выводит максимальное из трех чисел.
Написать программу в Pascal?
Написать программу в Pascal.
Написать программу которая выводит квадраты всех четных чисел в диапазоне от а до б?
Написать программу которая выводит квадраты всех четных чисел в диапазоне от а до б.
Вы зашли на страницу вопроса Написать программу на языке Pascal?, который относится к категории Информатика. По уровню сложности вопрос соответствует учебной программе для учащихся 5 - 9 классов. В этой же категории вы найдете ответ и на другие, похожие вопросы по теме, найти который можно с помощью автоматической системы «умный поиск». Интересную информацию можно найти в комментариях-ответах пользователей, с которыми есть обратная связь для обсуждения темы. Если предложенные варианты ответов не удовлетворяют, создайте свой вариант запроса в верхней строке.
Var a, b, c, d : integer ;
begin
b : = 0 ;
randomize ;
a : = random(1000) ;
while b< ; > ; 10 do
begin
writeln (a) ;
b : = b + 1 ;
end ;
end.