сервис вопросов и ответовкак решить задачу, помогите!!!!!! В массиве, состоящем из 30 элементов введены буквы и символы русского алфавита. определить можно ли из этих значений
10-11 класс|
|
составить фразу "Зимняя олимпиада-в Сочи!".
Yakishindero
06 февр. 2015 г., 1:17:56 (9 лет назад)
NikFor
06 февр. 2015 г., 1:54:06 (9 лет назад)
Предлагаю вариант в VBA Excel
Код программы можно увидеть нажав Alt+F11
Ответить
Другие вопросы из категории
При опросе 13 человек, каждый из которых знает по крайней мере один иностранный язык, выяснилось, что 10 человек знают английский язык, 7 – немецкий, 6
– испанский, 5 – английский и немецкий, 4 – англий- ский и испанский, 3 – немецкий и испанский. Сколько человек знают все три языка?
Пожалуйста, запишите програму по информатике вот так для задачки Program var begin write realn
формула
end
задачка.
Петрусь задумав число і нікому його не назвав. Друзі упіймали його і примусили подвоїти задумане число, а потім додати до нього 5. І тільки після того, як вони пообіцяли Петрусеві благодійну допомогу на контрольній з математики, він зізнався, що вийшло число n. Визначте, яке число задумав і приховав від своїх друзів Петрусь.
Читайте также
Паскаль помогите пжл!!!!!! Дан одномерный массив, состоящий из вещественных элементов. Найти произведение элементов массива,
расположенных между максимальным и минимальным элементами.
Дан одномерный массив, состоящий из вещественных элементов. Найти произведение элементов массива, расположенных между максимальным по модулю и минимальным по модулю элементами
ну или исправьте мое пжл
program fgf;
var mas:array[1..100] of real;
max,min:real;
i,n,c,b:shortint;
p:real;
f1,g:text;
begin;
assign (f1, 'input.txt');
reset (f1);
readln (f1, n);
for i:=1 to N do read (mas[i]);
max:=mas[i];
for i:=2 to N do begin
if mas[i]>max then begin
max:=mas[i];
c:=i;
end;
end;
min:=mas[1];
for i:=2 to N do begin
if mas[i]<min then begin
max:=mas[i];
b:=i;
end;
end;
close(f1);
assign (g, 'output.txt');
rewrite (g);
p:=1;
if b<c then I:=b+1 and c-1
else for I:=c+1 to b-1 do p:=p*mas[i];
if (n<3) or (b+1=c) or (c+1=b) then writeln(g,'0.00') else write(p:3:3) ;
close (g);
end.
ПАСКАЛЬ.1)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 1000.опишите на русском языке или на одном из
языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.
ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ ПОЖАЛУЙСТА.я пропустила тему.ПО ПАСКАЛЬ.!!
Дан одномерный массив А состоящий из 10 элементов.Вывести на экран исходную таблицу и резултат программы.
Найти произведения элементов массива А. удовлетворяющих условию:
c<=A[i]<=d.
пожалуйста ... помогите.... очень срочно нужно... помогите решить задачу на Паскале....отсортировать массив из пяти элементов и подсчитать количество
уникальных чисел в массиве....заранее спасибо...
Написать программу и блок-схему для решения следующей задачи. В двумерном массиве, состоящем из целочисленных элементов, поменять местами: в каждом
столбце первый и последний отрицательные элементы;
(Паскаль)
Вы находитесь на странице вопроса "как решить задачу, помогите!!!!!! В массиве, состоящем из 30 элементов введены буквы и символы русского алфавита. определить можно ли из этих значений", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.