Составьте программу по которой компьютер десять раз

значение введенных чисел (массив не использовать).Сделайте три варианта программы,используя операторы While,Repeat ,For.

Ответы

Будь первым, кто ответит на вопрос

Как добавить хороший ответ?

Что необходимо делать:

  • Написать правильный и достоверный ответ;
  • Отвечать подробно и ясно, чтобы ответ принес наибольшую пользу;
  • Писать грамотно, поскольку ответы без грамматических, орфографических и пунктуационных ошибок лучше воспринимаются.

Что делать не стоит:

  • Списывать или копировать что-либо. Высоко ценятся ваши личные, уникальные ответы;
  • Писать не по сути. «Я не знаю». «Думай сам». «Это же так просто» — подобные выражения не приносят пользы;
  • Писать ответ ПРОПИСНЫМИ БУКВАМИ;
  • Материться. Это невежливо и неэтично по отношению к другим пользователям.

Пример вопроса

Русский язык

7 минут назад

Какой синоним к слову «Мореплаватель»?

Пожаловаться

Урок 1. Первая программа на Pascal (Сложение чисел)

Хороший ответ

Вася Иванов

Мореплаватель — имя существительное, употребляется в мужском роде. К нему может быть несколько синонимов.
1. Моряк. Старый моряк смотрел вдаль, думая о предстоящем опасном путешествии;
2. Аргонавт. На аргонавте были старые потертые штаны, а его рубашка пропиталась запахом моря и соли;
3. Мореход. Опытный мореход знал, что на этом месте погибло уже много кораблей, ведь под водой скрывались острые скалы;
4. Морской волк. Старый морской волк был рад, ведь ему предстояло отчалить в долгое плавание.

Источник: uchi.ru

Составьте программу по которой компьютер десять раз запросит ввод целых и в результате сообщит сколько среди введённых чисел чётных и сколько нечётных.
желательно через For и While. Паскаль

Var i,A,c,n:integer;
Begin
c:=0;
n:=0;
For i:= 1 to 10 do
Begin
Read(A);
if A mod 2 = 0 then c:=c+1
else n:=n+1
End;
WriteLn(‘Количество чётных: ‘,c);
WriteLn(‘Количество нечётных: ‘,n);
End.

Читайте также:
Как проверить состояние блока питания компьютера с помощью программы

Цикл с предусловием:

Var i,A,c,n:integer;
Begin
c:=0;
n:=0;
i:=1;
While i Begin
Read(A);
if A mod 2 = 0 then c:=c+1
else n:=n+1;
i:=i+1
End;
WriteLn(‘Количество чётных: ‘,c);
WriteLn(‘Количество нечётных: ‘,n);
End.

Источник: znanija.site

50+лучший

Правильный ответ на вопрос «50+лучший Составьте программу, по которой компьютер десять раз запросит ввод любых чисел и в результате выведет среднее арифметическое . » по предмету Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант — оцените ответы на похожие вопросы. Но если вдруг и это не помогло — задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!

5 Ввод и вывод данных python. Команда input()

Новые вопросы по информатике

Объём видеопамяти составляет 100 Кбайт. Графический режим работает в режиме 640 х200 пикселей. Какое максимальное кол-во цветов может содержать палитра?

Переведите число 202 из восьмеричной системы счисления в десятичную

Переведите величины из одних единиц измерения информации в другие: 1 4 Гбайта=? Кбайт 2 217 Мбайт=? Гбайт 3 13 Мбит=? бит 4 27 Гбит=? бит 5 228 бит=? Мбайт 6 227 Гбит=? Мбайт 7 231 Кбайт=? Мбит

Вводятся 3 числа, вывести на экран нечетные числа pascal

1. Посчитай, сколько бит информации содержит 19 байт 2. Посчитай, сколько байт информации содержат 2 кб 3. Посчитай, сколько байт информации содержит 144 бит

Главная » Информатика » 50+лучший Составьте программу, по которой компьютер десять раз запросит ввод любых чисел и в результате выведет среднее арифметическое значение введенных чисел (массив не использовать).

Источник: abiturient.pro

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru