Информатика | 5 - 9 классы
ПАСКАЛЬ
дано натуральные число н и действительные числа а1, а2 .
Ан. Найти минимальное и максимальное число.
Дано натуральное число?
Дано натуральное число.
Найти максимальную цифру.
В паскале.
Через while.
Дана последовательность чисел?
Дана последовательность чисел.
Найти минимальное и максимальное число и вычислить их среднее арифметическое.
Дано натуральное число N, в котором все цифры различны?
Дано натуральное число N, в котором все цифры различны.
Найти остаток от деления максимальной цифры на минимальную цифру данного числа.
Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа?
Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа!
Даны три числа, найти максимальное из них и заменить квадратом этого числа?
Даны три числа, найти максимальное из них и заменить квадратом этого числа.
Помогите решить плииз с помощью паскаля.
Дано трёхзначное число?
Дано трёхзначное число.
Найти среди цифр этого числа, максимальное.
Программа в Паскале.
РЕШИТЕ В ПАСКАЛЕ?
РЕШИТЕ В ПАСКАЛЕ!
1. Найти разность между максимальным и минимальным числом из n введенных чисел.
Для натурального числа необходимо найти максимальное натуральное число, большее 1, не превосходящее , имеющее минимальное количество делителей?
Для натурального числа необходимо найти максимальное натуральное число, большее 1, не превосходящее , имеющее минимальное количество делителей.
Для N = 201220151 таким числом будет ….
Turbo Pascal даны действительные числа х, у найти минимальное из них?
Turbo Pascal даны действительные числа х, у найти минимальное из них.
Дано натуральное число?
Дано натуральное число.
Найти максимальную цифру.
В паскале.
Через процедуры.
На этой странице находится вопрос ПАСКАЛЬдано натуральные число н и действительные числа а1, а2 ?. Здесь же – ответы на него, и похожие вопросы в категории Информатика, которые можно найти с помощью простой в использовании поисковой системы. Уровень сложности вопроса соответствует уровню подготовки учащихся 5 - 9 классов. В комментариях, оставленных ниже, ознакомьтесь с вариантами ответов посетителей страницы. С ними можно обсудить тему вопроса в режиме on-line. Если ни один из предложенных ответов не устраивает, сформулируйте новый вопрос в поисковой строке, расположенной вверху, и нажмите кнопку.
Var n, i : integer ; a, max, min : real ;
begin
write('n = ') ;
readln(n) ;
readln(a) ;
max : = a ; min : = a ;
for i : = 1 to n - 1 do
begin
readln(a) ;
if a>max then max : = a ;
if a.