Статистика
Всего в нашей базе более 4 327 657 вопросов и 6 445 963 ответов!

Написать программу на Паскале, используя вместо FOR - WHILE. Помогите пожалуйста!

10-11 класс

1. Напишите программу, которая в последовательности из 12 натуральных чисел определяет минимальное чётное число. Программа получает на вход натуральные числа. В последовательности всегда имеется чётное число. Введённые числа не превышают 30 000. Программа должна вывести одно число – минимальное чётное число.

2. Напишите программу, которая в последовательности из 12 натуральных чисел определяет максимальное число, оканчивающееся на 2. Программа получает на вход натуральные числа. Введённые числа не превышают30 000. Программа должна вывести одно число – максимальное число, оканчивающееся на 2.

Vanechkapolovi 24 сент. 2016 г., 18:47:56 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Nataligerasimo
24 сент. 2016 г., 19:18:56 (7 лет назад)

1) 
 var
    a ,i,min: integer;
begin
min := 30000;
 i := 0;
 while i <> 12 do
  begin
   readln(a);
   if (a<min) and (a mod 2 = 0) then
    min := a;
   i := i +1;
  end;
writeln (min);
end.

2)
 var   
a ,i,max: integer;
begin
max := 0;  i := 0; 
while i <> 12 do 
begin   
readln(a);   
if (a>max) and (a mod 10 = 2) then   
max := a;   
i := i +1; 
end;
writeln (max);
end.

+ 0 -
Diman200000
24 сент. 2016 г., 21:02:57 (7 лет назад)

Массивы также не использовать

Ответить

Другие вопросы из категории

поменять местами k-й и l-й столбцы данного массива А(m,n)

нужна программа на паскале. помогите пожалуйста)

Читайте также

написать программу на Assembler

добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.

задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов

Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.

заранее огромное спасибо всем!

Написать программу, которая вводит с клавиатуры одномерный массив из n целых чисел, после чего выводит нулевые элементы с их индексами (их можно и не

оказаться)

нужно написать программу на c++
Используя обращения 1) по индексу и 2) по указателю.

Нужно написать программу на Паскале используя процедуру.

Условие: Найти и вывести максимальный элемент кратный N.
N вводится с клавиатуры.



Вы находитесь на странице вопроса "Написать программу на Паскале, используя вместо FOR - WHILE. Помогите пожалуйста!", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.