Сообщение на тему , , открытия в ИКТ, ,

Исто́рия информацио́нных техноло́гий берёт своё начало задолго до возникновения современной дисциплины информатика, появившейся в XX веке[⇨]. Информационные технологии (ИТ) связаны с изучением методов и средств сбора, обработки и передачи данных с целью получения информации нового качества о состоянии объекта, процесса или явления.

Ввиду возрастания потребностей человечества в обработке всё большего объёма данных, средства получения информации совершенствовались от самых ранних механических изобретений[⇨] до современных компьютеров[⇨]. Также в рамках информационных технологий идёт развитие сопутствующих математических теорий[⇨], которые сейчас формируют современные концепции[⇨][1].

Информационные технологии активизируют и эффективно используют информационные ресурсы общества (научные знания, открытия, изобретения, технологии, передовой опыт), что позволяет получить существенную экономию других видов ресурсов – сырья, энергии, полезных ископаемых, материалов и оборудования, людских ресурсов, социального времени[2]. К настоящему времени ИТ несколько эволюционных этапов[⇨], смена которых определяется главным образом развитием научно-технического прогресса, появлением новых технических средств переработки информации. Основным техническим средством технологии переработки информации является персональный компьютер, который существенно повлиял как на концепцию построения и использования технологических процессов, так и на качество информации, получаемой после обработки[3].

Паскаль(в переменную а записоваем трехзначное число)
program _1;
var a,b:integer;
s,s1:integer;
begin
readln(a,b);
s:=a mod 100;
s1:=sqr(s+b);
writeln(s1);
end.

На Сишке(в переменную а трехзначное)
#include <iostream>
using namespace std;
int main(){
int a,b,c;
cin>>a>>b;
a=a%100;
c=(a+b)*(a+b);
cout<<c<<endl;
system("pause");
}

Если коротко обьяснить тему, то так: суть в том, чтоб откинуть лишнее, тоесть оставить только десятки. Функция mod(паскаль) возвращает нам остаток от деления на какое нибудь число. Тоесть если мы например поделим 112 mod 100, то остаток будет 12, его мы и получим. Он же и является десятком. Тоже делает и знак % в Cишке. Если же нам надо получить целую часть от деления, то используем функцию div. Пример: 112 div 10 =11. Аналог в Сишке-знак "/"
Буду благодарен за "Лучший ответ"

Var a:array[1..1000] of integer;
i,s,n:integer;
begin
write ('Введите размер массива n= ') ; readln(n);
for i:=1 to n do a[i] :=random(50)-30;
for i:=1 to n do write(a[i],' ');
writeln;
s:=0;
for i:= 1 to n do
if a[i] mod 2 <>0 then s :=s+a[i];
writeln('Сумма нечетных элементов массива = ', s);
end.
2. 
var a:array[1..1000] of integer;
i,max,min,n:integer;
begin
write ('Введите размер массива n= ') ; readln(n);
for i:=1 to n do a[i] :=random(50)-30;
for i:=1 to n do write(a[i],' ');
writeln;
max:=-32768; min:=32767;
for i:= 1 to n do 
begin
if a[i] >max then max:=a[i];
if a[i] <min then min:=a[i];
end;
writeln('Максимальный  элемент массива = ', max);
writeln('Минимальный  элемент массива = ', min);
end.