Var
a,b,r:byte;
begin
randomize;
a:=Random(9)+1;
b:=Random(9)+1;
Write(a,' x ',b,' = ');
Readln(r);
if r=a*b then Writeln('Правильно!')
else Writeln('Вы ошиблись. Верный результат ',a*b)
end.
1) Язык программирования назван в честь математика <span>Лавлейс Ады
2) Паскаль создан в 1969-1970 году Никлаусом Виртом. Назван в честь Блеза Паскаля, французского математика и физика
3) Разработчиками языка являются </span>Сеймур Пейперт<span> и </span>Идит Харель<span> </span>
№1 -3)
№2 - 1)
№3 - 2)
№4 - 2)
№5 - 5)
№6 - 2)
№7 - 1)
язык с++. Выводит модуль наибольшего числа
#define _CRT_SECURE_NO_WARNINGS
#include<iostream>
#include<vector>
#include<iomanip>
#include<string>
#include<string.h>
#include<algorithm>
#include<cmath>
using namespace std;
int main() {
int a, i=0;
vector <int> numbs;
for (i = 0; i != 3; i++) { cin >> a; numbs.push_back(abs(a)); }
sort(numbs.rbegin(), numbs.rend());
cout << numbs[0];
return 0;
}