Ответ.
Меню
Задать вопрос!
Вход
Регистрация
Задать вопрос!
Меню
Все категории
Фотография и видеосъемка
Знания
Другое
Гороскопы, магия, гадания
Общество и политика
Образование
Путешествия и туризм
Искусство и культура
Города и страны
Строительство и ремонт
Работа и карьера
Спорт
Стиль и красота
Юридическая консультация
Компьютеры и интернет
Товары и услуги
Темы для взрослых
Семья и дом
Животные и растения
Еда и кулинария
Здоровье и медицина
Авто и мото
Бизнес и финансы
Философия, непознанное
Досуг и развлечения
Знакомства, любовь, отношения
Наука и техника
starsimperia
[7]
3 года назад
6
дана последовательность целых чисел, заканчивающаяся нулем. написать программу, котороая подсчитывает количество чисел в последо
вательности
Знания
Информатика
Ответить
Комментировать
Отправить
1
ответ:
Масяня1987
3 года назад
0
0
На паскале
program m1;
var a: aarray [1..10] of integer;
i,n,k: integer;
begin
readln (n);
for i:= 1 to n do readln (a[i]);
k:= 0;
for i:= 1 to n do begin
if a[i]<>0 then k:= k+1;
end;
writeln (k) {если 0 нужно учитывать в количестве то...} writeln (k+1);
end.
Отправить
Читайте также
Имя,обознаающее конкретный объект в некотором множестве?
полягав
Может имя <em>собственное</em>
0
0
4 года назад
Задания по Pascal №1 найти все двузначные числа, такие, что сумма цифр равна A, а само число делится на B. A и B вводятся с клав
РыбкиН [28]
1. Вар сам напиши.
begin
readln(a,b);
For i:=10 to 99 do
if (i mod 10 + i div 10=a) and (i mod b=0) then writeln(i);
end.
2. Вар сам напиши,
begin
readln(a,b);
for i:=a to b do
if a mod 5 then writeln(i);
end.
0
0
3 года назад
Нужно составить блок-схему по программе Program Lab1; const n = 20; var a: array[1..n] of byte; i, imin: byte; begin writeln('
алла 5
FCEditor разгрузит тебе работу, вот 2 раз и схема готова.
0
0
1 год назад
Какое название предмета одежды может быть зашифровано в числе 3165161319121, если каждая буква заменена ее номером в алфавите?
Александра Виктор... [56]
3-16-5-16-13-1-9-12-1 Водолазка
0
0
3 года назад
Составить программу: С клавиатуры вводятся значения длины стороны равностороннего треугольника. Найдите высоту и площадь треугол
dima5
Вот я думаю что так надо делать
0
0
4 года назад
Смотрите также:
В танцевальном кружке занимаются две девочки: Женя и Маша и два мальчика: Олег и Вова. Сколько различных танцевальных пар можно
6
·
1 ответ
Какая информация сохраняется во внешней памяти о растровом изображении?
6
·
2 ответа
Помогите задание на картинки. за раннее спасибо
6
·
1 ответ
ОБЪЯСНИТЕ,что такое исполнитель водолей и как он действует???
6
·
1 ответ
За какое время в минутах будут переданы данные с компа диска объемам 650 мегабайт по каналу связи со скоростью 3072 кбайт в сек
5
·
1 ответ
Надо найти правильный ответ в вопросах,помогите,срочно надо!1) Какая основная функция компьютера в настоящее время? А. вычислени
6
·
2 ответа
Как представлено число 263 в восьмеричной системе счисления?
5
·
2 ответа
Зашифрованно слово в котором каждая буква заменена порядковым номером русского алфавита.На листке обнаруженна запись 26113126.Ка
5
·
1 ответ
Напишите программу Найти значение y, если х - вещественное число. y=-5+3x, если х>0, либо y=x2-2, в противном случае.
14
·
1 ответ
Паскаль Задача 1. Написать программу вывода первых t элементов одномерного массива из 10 элементов, введенных с клавиатуры Задач
9
·
1 ответ
×
Добавить ответ
Отправить
×
Вход
E-mail
Пароль
Запомнить меня
Войти
Не зарегистрированы?
Пройти быструю регистрацию
×
Регистрация
Ваше имя
E-mail
Пароль
Зарегистрироваться
close
Вход
Регистрация
Задать вопрос!