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

Вводится 15 чисел. Определите среди них целые числа. На программе Pascal ABCNET как сделать, подскажите пожалуйста!!=)Буду весьма благодарен!!))

5-9 класс

MeriKoch 23 янв. 2014 г., 11:15:15 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
SaШка
23 янв. 2014 г., 13:45:24 (10 лет назад)

program abcnet;
var a:array[1..15] of integer;
     i:integer;
begin
for i:=1 to 15 do
read(a[i]);
for i:=1 to 15 do
if a[i]>0 then write(a[i]:3);
end.

Ответить

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

Помогите по программе paskal : 1.дано целое число.напишите программу которая уменьшает на 2 модуль этого числа и выводит на экран монитора

результат

2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат

1) составьте программу заполнения элементов массива [1..10 ] случайнымии целыми числами на отрезке [ 0;35 ] и вывода на экран нечетных элементов и

кратных числу 3.

2) составьте программу , которая заполняет массив а[1..10 ] случайными целыми числами в диапозоне от 1 до 100 и выводит на экран среднее арифмитическое элементов массива

1.Дано целое число составить программу которая определяет оканчивающие данное число цифрой семь.

2.Дано 2х значное число составить программу с помощью которой можно отпределить входит ли в это число цифра шесть.



Вы находитесь на странице вопроса "Вводится 15 чисел. Определите среди них целые числа. На программе Pascal ABCNET как сделать, подскажите пожалуйста!!=)Буду весьма благодарен!!))", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.