#include <iostream>
#include <cstdlib>
using namespace std;
int main()
{
setlocale(LC_ALL,"russian");
cout << "Введите количество нечётных чисел (до 2000 включительно) ";
int count;
int sum = 0;
cin >> count;
if(count >= 1 && count <= 2000)
{
for(int i = 1; i<=count; i++)
{
if(i%2!=0)
{
if(i!=count) // проверка на то, ставить ли ещё 1 плюс или будет равно
{
cout << i << " + ";
sum=sum+i;
}
else
{
cout << i;
sum=sum+i;
}
}
else
{
if(i!=count)
{
cout << i+1 << " + ";
i++;
sum=sum+i;
}
else
{
cout << i+1;
i++;
sum=sum+i;
}
}
}
}
cout << " = " <<sum;
system("pause");
return 0;
}
Аналогичная программа:
#include <iostream>
#include <cstdlib>
using namespace std;
int main()
{
setlocale(LC_ALL,"russian");
cout << "Введите последнее нечётное число";
int num;
int a;
cin >> num;
num=num+1;
num=num/2;
num=num*num;
cout << "Итого: " << num;
system("pause");
return 0;
}
История возникновения термина
Основы учения об архитектуре вычислительных машин заложил фон Нейман в 1944 году, когда подключился к созданию первого в мире лампового компьютера ЭНИАК. В процессе работы над ЭНИАКом в Институте Мура в Пенсильванском Университете во время многочисленных дискуссий фон Неймана с его коллегами Джоном Уильямом Мокли, Джоном Эккертом, Германом Голдстайном и Артуром Бёрксом возникла идея более совершенной машины под названием EDVAC. Исследовательская работа над EDVAC продолжалась параллельно с конструированием ЭНИАКа.
Первая страница отпечатанной копии «Первого отчёта по EDVAC»
В марте 1945 года принципы логической архитектуры были оформлены в документе, который назывался «Первый проект отчёта о EDVAC» — отчёт для лаборатории Армии США, на чьи деньги осуществлялась постройка ЭНИАКа и разработка EDVACа. Отчёт, поскольку он являлся всего лишь наброском, не предназначался для публикации, а только для распространения внутри группы, однако Герман Голдстайн — куратор проекта со стороны Армии США — размножил эту научную работу и разослал её широкому кругу учёных для ознакомления. Так как на первой странице документа стояло только имя фон Неймана[1], у читавших документ сложилось ложное впечатление, что автором всех идей, изложенных в работе, является именно он. Документ давал достаточно информации для того, чтобы читавшие его могли построить свои компьютеры, подобные EDVACу на тех же принципах и с той же архитектурой, которая в результате стала называться «архитектурой фон Неймана».
После завершения Второй мировой войны и окончания работ над ЭНИАКом в феврале 1946 года команда инженеров и учёных распалась, Джон Мокли, Джон Экерт решили обратиться в бизнес и создавать компьютеры на коммерческой основе. Фон Нейман, Голдстайн и Бёркс перешли в Институт перспективных исследований, где решили создать свой компьютер «IAS-машина», подобный EDVACу, и использовать его для научно-исследовательской работы. В июне 1946 года они[2][3] изложили свои принципы построения вычислительных машин в ставшей классической статье «Предварительное рассмотрение логической конструкции электронно-вычислительного устройства»[4][5][6]. С тех пор более полувека, но выдвинутые в ней положения сохраняют свою актуальность и сегодня. В статье убедительно обосновывается использование двоичной системы для представления чисел, а ведь ранее все вычислительные машины хранили обрабатываемые числа в десятичном виде. Авторы продемонстрировали преимущества двоичной системы для технической реализации, удобство и простоту выполнения в ней арифметических и логических операций. В дальнейшем ЭВМ стали обрабатывать и нечисловые виды информации — текстовую, графическую, звуковую и другие, но двоичное кодирование данных по-прежнему составляет информационную основу любого современного компьютера.
Объяснение:
i,n,k:integer;
begin
Writeln('15 чисел, кратных 19:');
i:=100;
while i mod 19<>0 do Inc(i); { первое, кратное 19 }
Write(i,' ');
k:=1;
while k<15 do begin i:=i+19; Write(i,' '); Inc(k) end;
Writeln
end.
Тестовое решение:
15 чисел, кратных 19:
114 133 152 171 190 209 228 247 266 285 304 323 342 361 380
Задача 2.
var
m,V,rho,rmax:real;
i:integer;
begin
Writeln('Максимальная плотность материала для 30 тел.');
Writeln('Вводите через пробел массу тела (кг) и объем (куб.см)');
rmax:=0;
for i:=1 to 3 do
begin
Write(i:2,': '); Read(m,V);
rho:=m/V;
if rmax<rho then rmax:=rho
end;
Writeln('Максимальная плотность равна ',rmax:0:3)
end.