<h3>Программы будущего</h3><h3 />
В 21-м веке программы стали неотъемлемой частью почти всех людей в мире. В мире насчитывается более миллиарда программ и каждый имеет возможность найти подходящую для него.
Но часто ли Вы задумываетесь какие программы будут в будущем? Какое предназначение они будут нести? На этот вопрос я постараюсь ответить. Что мы знаем о программах: они полезны, быстры, упрощают нам жизнь. Следовательно в будущем они будут быстрее и практичнее. Скорее всего в будущем каждая программа будет обладать искусственным интеллектом, который будет выполнять различные функции. И это позволит в разы ускорить взаимодействие человека с программой. Одна программа будет заменять сотню предыдущих, будет выполнять бытовые и не только работы. Например, допустим будет существовать программа от русских разработчиков "Сделаю ВСЕ", которая будет вам заводить будильник, отсылать машину на мойку, заправлять машину, поливать цветы, сообщать о погоде и о интересующих вас новостях. Каждый день мы шаг за шагом стремимся к этому промежутку времени, когда одна программа сможет облегчить нам жизнь в сотню раз.
Я считаю, что в будущем нас ждут прекрасные программы. Возможно, даже появятся такие программы, которые будут писать домашку за простых смертных. И это время будут по-истине удивительным и прекрасным!
var s,s1: string;
i: integer;
begin
readln(s);
readln(s1);
if length(s)<>length(s1) then
write('нет') else begin
for i:=1 to length(s) do
if s[i]<>s1[i] then break;
if i=length(s) then write('да')
else write('нет');
end;
end.
Так как язык указан не был, написал на C++
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
#include <iostream>
using namespace std;
int main() {
setlocale(LC_ALL, "Russian");
const size_t len = 40;
int arr[40];
for (size_t i = 0; i < len; ++i)
arr[i] = 5 - rand() % (10);
size_t count = 0;
for (size_t i = 0; i < len; ++i)
if (arr[i] > 0)
count++;
cout << count << endl; return 0;
}
Var i:integer;
begin
for i:=1 to 43 do
writeln(sqr(i));
readln;
<span>end.</span>