1)Составьте программу, которая находит большее из двух введенных с клавиатуры чисел a, b и выводит его на экран. Числа 7 и 9 var a,b : integer; begin write('Enter a: '); read(a); write('Enter b: '); read(b); if a>b then writeln(a) else writeln(b); end. 2) Составьте программу, которая находит меньшее из трёх введенных чисел a, b, c и выводит его на экран. Числа 10, 4 и 9 var a,b,c : integer; begin write('Enter a: '); read(a); write('Enter b: '); read(b); write('Enter c: '); read(c); if (a<b) and (b<c) then writeln(a); if (b<c) and (c<a) then writeln(b) else writeln(c); end. 3) Составьте программу определяющую, является ли введенное с клавиатуры целое число кратным 3. var a: integer; begin write('Enter a: '); read(a); if (a mod 3) = 0 then writeln('Кратно') else writeln('Не кратно'); end.
1)Составьте программу, которая находит большее из двух введенных с клавиатуры чисел a, b и выводит его на экран. Числа 7 и 9 var a,b : integer; begin write('Enter a: '); read(a); write('Enter b: '); read(b); if a>b then writeln(a) else writeln(b); end. 2) Составьте программу, которая находит меньшее из трёх введенных чисел a, b, c и выводит его на экран. Числа 10, 4 и 9 var a,b,c : integer; begin write('Enter a: '); read(a); write('Enter b: '); read(b); write('Enter c: '); read(c); if (a<b) and (b<c) then writeln(a); if (b<c) and (c<a) then writeln(b) else writeln(c); end. 3) Составьте программу определяющую, является ли введенное с клавиатуры целое число кратным 3. var a: integer; begin write('Enter a: '); read(a); if (a mod 3) = 0 then writeln('Кратно') else writeln('Не кратно'); end.
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
setlocale(LC_CTYPE, "");
cout << "введите абс";
double a, b, c;
cin >> a >> b >> c;
if (a == 0) {
cout << "a!=0";
exit(1);
}
double D = powl(b, 2) - 4 * a * c;
if (D > 0) {
cout << (b - sqrt(D)) / (-2 * a) << endl;
cout << (b + sqrt(D)) / (-2 * a);
}
else if (D == 0) {
cout << b / (-2 * a);
}
else {
cout << "Корней нет";
}
return 0;
}