program zadacha_pervaya; uses crt; var a,b: array [1..5] of integer; c: array [1..10] of integer; i,k: integer; beginclrscr; k: =0; for i: =1 to 5 do beginreadln(a[i]); if a[i]> 0 then begink: =k+1; c[k]: =a[i]; end; end; for i: =1 to 5 do beginreadln(b[i]); if b[i] mod 2 < > 0 then begink: =k+1; c[k]: =a[i]; end; end; for i: =1 to k do beginwriteln(c[i]); end; end.
У компьютера также существуют 2 вида памяти.
Оперативная память — предназначена для временного хранения информации, т. е. на момент, когда компьютер работает (после выключения компьютера информация удаляется из оперативной памяти).
Долговременная память (внешняя) — для долгого хранения информации (при выключении компьютера информация не удаляется).
Существует память отдельного человека и память человечества. Память человечества, в отличие от памяти человека, содержит все знания, которые накопили люди за время своего существования и которыми могут воспользоваться ныне живущие люди. Эти знания представлены в книгах, запечатлены в живописных полотнах, скульптурах и архитектурных произведениях великих мастеров.
Изобретённая в 1839 году фотография позволила сохранить для потомков лица людей, пейзажи, явления природы и другие зримые свидетельства времён.
В 1895 году в Париже был продемонстрирован первый в мире кинофильм. С той поры человечество получило возможность сохранять образы, воплощённые в движении (танец, жесты, пантомимы и т. д.).
Человек научился хранить и звуковую информацию. Вначале её сохранение обеспечивалось передачей «из уст в уста» (например, напевами), позднее — с записи нот.
В середине столетия в Японии было налажено производство магнитофонов. До сих пор магнитофоны применяются для записи и воспроизведения звуковой информации.
Современный компьютер может хранить в своей памяти различные виды информации: текстовую, числовую, звуковую и видеоинформацию.
Информация хранится в разном виде: текста, рисунка, схемы, фотографии, звукозаписи, кино и видеозаписи и т. д.
В каждом случае применяются свои носители.
Носитель — это материальная среда, используемая для записи и хранения информации.
Бумажные носители
Бумага изобретена во II веке н. э. в Китае.
Информационный объём книги из 300 страниц по 2000 символов на странице составляет примерно 600 000 байтов, или 586 Кб.
Школьная библиотека из 5000 томов имеет информационный объём приблизительно 2861 Мб = 2,8 Гб.
На первых компьютерах использовали бумажные носители — перфоленту и перфокарту.
Магнитные носители
В XIX веке была изобретена магнитная запись (на стальной проволоке диаметром 1 мм).
В 1906 году был выдан патент на магнитный диск.
Ферромагнитная лента использовалась как носитель для ЭВМ первого и второго поколения. Её объём был 500 Кб. Появилась возможность записи звуковой и видеоинформации.
В начале 1960 -х годов в употребление входят магнитные диски.
Винчестер компьютера — это пакет магнитных дисков, надетых на общую ось.
Информационная ёмкость современных винчестеров измеряется в Гб.
Компакт-диск (англ. Compact Disc) — оптический носитель информации в виде пластикового диска с отверстием в центре, процесс записи и считывания информации с которого осуществляется при лазера.
#include <bits/stdc++.h>
using namespace std;
int search1(string str) {
for (int i = 0; i < str.size(); i++) {
if (str[i] == 'f') return i;
}
return -1;
}
int search2(string str) {
for (int i = str.size() - 1; i >= 0; i--) {
if (str[i] == 'f') return i;
}
return -1;
}
int main() {
string str = {};
getline(cin, str);
int a = search1(str);
int b = search2(str);
if (a != -1) {
if (a == b)
cout << a;
else
cout << a << " " << b;
}
return 0;
}
Поделитесь своими знаниями, ответьте на вопрос:
program mazoff1; uses crt; var a,b: array [1..5] of integer; //массивы а и в c: array [1..10] of integer; //массив с i,j: integer; //счетчикиbegin randomize; j: =0; for i: =1 to 5 do begin a[i]: =random(101)-50; //заполняем массивы b[i]: =random(101)-50; //случайными числами от -50 до 50 end; for i: =1 to 5 do begin write(a[i],' '): 5; //выводим массивы а и в в столбик writeln(b[i]): 5; end; for i: =1 to 5 do begin if a[i]> 0 then //проверяем текущий элелмент массива а begin j: =j+1; //если он положительный, увеличиваем счетчик на 1 c[j]: =a[i]; //и добавляем этот элемент в массив с end; if b[i] mod 2 < > 0 then //проверяем текущий элелмент массива в begin j: =j+1; //если он чётный, увеличиваем счетчик на 1 c[j]: =b[i]; //и добавляем этот элемент в массив с end; end; writeln('всего в массиве с ',j,' элементов: '); for i: =1 to j do writeln(c[i]); end.
program mazoff2; uses crt; const n = 20; var mas: array [1..n] of real; //массив данных i,j: integer; //счетчики ur,pl: real; //урожай и площадьbegin randomize; for i: =1 to n do begin mas[i]: =random(101); //заполняем массив end; j: =1; ur: =0; pl: =0; while j< =n do begin ur: =ur+mas[j]*mas[j+1]; pl: =pl+mas[j+1]; j: =j+2; end; writeln('всего собрано ',ur,' тонн с общей площади ',pl,' га.'); writeln('средняя урожайность равна ',ur/pl: 3: 2); end.
кстати, программа димана добавляет сначала все нужные элементы из массива а, а только потом - из массива в. а в условии сказано: "попеременно"