сервис вопросов и ответовПОМОГИТЕ НАПИСАТЬ ХОТЯ БЫ ОДНУ ЗАДАЧУ НА Pascal ОНИ НЕ СЛОЖНЫЕ , А Я ДАЮ МНОГО ПУНКТОВ!! За 2 лучший ответ! Без плагиата! 1.Написать
5-9 класс|
|
программу,используя оператор цикла While,которая будет вводить целые положительные числа не превышающие 100. Найти сумму квадратов чисел 2.Написать программу используя оператор цикла Repeat,которая будет вводить целые числа до тех пор пока не будет введён 0.Подсчитать среднее арифметическое введённых чисел.
Lotorevroman
18 июля 2014 г., 1:38:25 (9 лет назад)
Pianooldnick
18 июля 2014 г., 4:28:46 (9 лет назад)
var
k : int64;
c : integer;
begin
k := 0;
while not eoln do
begin
read (c);
k := k + sqr (c);
end;
writeln (k);
end.
var
count, c, sum : integer;
begin
count := 0;
sum := 0;
c := 0;
repeat
read (c);
sum := sum + c;
inc (count);
until c = 0;
if count > 0 then writeln (sum / (count - 1)) else writeln ('Невозможно делить на 0');
end.
Ответить
Другие вопросы из категории
Как решить? 1. Информационное сообщение объемом 1,5 Кбайта содержит 3072 символа. Сколько символов содержит алфавит, при
помощи которого было записано это сообщение?
Решение:
2. Для записи текста использовался 256-символьный алфавит. Каждая страница содержит 30 строк по 70 символов в строке. Какой объем информации содержат 5 страниц текста?
Решение:
Дана зашифрованная пословица.Чтобы рубить дрова, нужен 14,2,3,2,7, а чтобы полить огород – 10,4,5,1,6.
Рыбаки сделали во льду 3,7,2,7,8,9,11 и стали ловить рыбу.
Самый колючий зверь в лесу – это 12,13.
А теперь расшифруйте пословицу:1,2,3,4,5,1,67,8,9,10,119,4,7,4,13,12,14
2.считая что каждый символ кодируется одним байтом, определите, чему равен в битах информационный объем следующего высказывания Жан-Жака Руссо : ТЫСЯЧИ
ПУТЕЙ ВЕДУТ К ЗАБЛУЖДЕНИЮ, К ИСТИНЕ - ТОЛЬКО ОДИН.
Читайте также
решить любые 2 задачи, пожалуйста!!! или хотя бы одну в PASKALe
1. Найти те элементы массива, которые равны сумме двух своих соседей. Первый и последний элемент имеют только по одному соседу, поэтому искомыми быть не могут.
На вход программе сначало подается значение n<=100 – количество элементов в массиве. В следующей строке расположены сами элементы массива – целые числа, по модулю не превосходящие 10000. Выдайте значения искомых элементов массива в том же порядке, в каком они располагались во входных данных.
2. На вход программе подается последовательность чисел от 1 до 9, заканчивающаяся нулем. Всего будет введено не более 100000 чисел. Подсчитайте в этой последовательности количество единиц, количество двоек, количество троек и т.д. и выдайте результат. В выходных данных всегда должно быть 9 чисел.
3. Текст на английском языке запишите в массив a[1..1000] of char. Помимо английских букв в нем могут встречаться пробелы и знаки препинания. В массиве b [‘A’ ..’Z’’] of integer получите сведения о том, сколько и каких букв встречается в этом тексте. При подсчете строчные и прописные буквы не различать. На вход программе подается значение n<=1000 – количество символов в тексте. В следующей строке входных данных расположены сами символы (без разделителей). Выдайте 26 чисел – значения элементов массива b.
Пример
Входные данные
Выходные данные
12
Hello world!
0 0 0 1 1 0 0 1 0 0 0 3 0 0 2 0 0 1 0 0 0 0 1 0 0 0
4. Подсчитайте за один проход, сколько его элементов равны максимальному элементу.
На вход программе сначала подается значение n<=100 – количество элементов в массиве. В следующей строке входных данных расположены сами элементы массива – целые числа, по модулю не превосходящие 30000. Выдайте количество искомых элементов массива.
5. В массиве, заполненным произвольными целыми числами, найдите два числа, произведение которых максимально. Вложенные циклы не используйте. На вход программе сначала подается значение n<=10000 – количество элементов в массиве. В следующей строке входных данных расположены сами элементы – целые числа, по модулю не превосходящие 30000. Выдайте два искомых числа в порядке неубывания.
6. На вход программе сначала подается значение n<=100 – количество элементов в массиве. В следующей строке входных данных расположены сами элементы массива – целые числа, по модулю не превосходящие 30000. Распечатайте только те значения элементов массива, которые встречаются в нем ровно один раз. Элементы следует распечатывать в том порядке, в котором они встречаются в массиве.
Решите,пожалуйста,хотя бы одну из данных задач:
1)Написать программу,подсчитывающую сумму положительных из трех данных чисел.
2)Напечатать те из двузначных чисел которые делятся на 4,но не делятся на 6.
СРОЧНО!!!
Помогите! Хотя бы одну задачу.
1. Измерьте информационный объем сообщения, состоящего из 100 знаков, учитывая, что мощность русского алфавита равна 32. выразите этот объем в битах, байтах, Кбайтах!
2. Сообщение, записанное буквами из 64 символьного алфавита, содержит 15 символов. Какой объем информации оно несёт.
3. Одно племя имеет 32 символьный алфавит, а второе 64 символьный. Вожди племён обменялись письмами. Письмо первого племени содержало 70 символов, а второго - 60. Сравните объем информации, содержащейся в письмах.
4. Реферат учащегося имеет объем 20 Кбайт. Каждая страница реферата содержит 32 строки по 64 символа в каждой, мощность алфавита 256. Сколько страниц в реферате?
Пожалуйста, помогите) Очень важно) Решите хотя бы одну задачу... А если не сложно, то лучше 2 :))) 1) Информационная ёмкость
человеческой яйцеклетки приблизительно равна 2 в 33 степени битов. Сколько дискет ёмкостью 1,4 МБайт потребуется для размещения этой информации ?
2) Дискета объёмом 1440 КБайт весит 20 г. Сколько будет весить набор дискет, необходимый для полногокопирования информации с жёсткого диска объёмом 80 ГБайт ?
Заранее огроооомное спасибо :)
Помогите Написать программу решения математической задачи (ABC Pascal).
Вы купили в магазине
Вы находитесь на странице вопроса "ПОМОГИТЕ НАПИСАТЬ ХОТЯ БЫ ОДНУ ЗАДАЧУ НА Pascal ОНИ НЕ СЛОЖНЫЕ , А Я ДАЮ МНОГО ПУНКТОВ!! За 2 лучший ответ! Без плагиата! 1.Написать", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.