Получилось на 15 мин быстрее))) Как я понял, нужно определить, какая буква введена с клавиатуры - большая или маленькая, сделала для английского и русского языка program one; var a:string; begin readln(a); if a[1] in ['a'..'z'] then writeln('Маленькая'); if a[1] in ['A'..'Z'] then writeln('Большая'); if a[1] in ['а'..'я'] then writeln('Маленькая'); if a[1] in ['А'..'Я'] then writeln('Большая'); end.
Program v1; var a,b,c: real; begin readln (a,b,c); If c > a+b then writeln ( 'Такого треугольника не существует'); If a > c+b then writeln ( 'Такого треугольника не существует'); If b> a+c then writeln ( 'Такого треугольника не существует'); If a=b and a=c then writeln ('Этот треугольник равносторонний'); If a=b or a=c or b=c then writeln ('Этот треугольник равнобедренный'); If a = scrt ( b*b + c*c) then writeln ('Этот треугольник прямоугольный'); If b = scrt (a*a + c*c) then writeln ('Этот треугольник прямоугольный'); If c = scrt (a*a + b*b) then writeln ('Этот треугольник прямоугольный'); end.
#include <iostream> #include <cstdio> #include <cmath> using namespace std; int main() { int a, b, c; cin>>a>>b>>c; if ((a + b < c) || (a + c < b) || (b + c < a)) { cout<<"Не треугольник"; return 0; } if ((a * a + b * b == c * c) || (a * a + c * c == b * b)|| (c * c + b * b == a * a)) { cout<<"Прямоугольный"; return 0; } if ((a * a + b * b > c * c) || (a * a + c * c > b * b)|| (c * c + b * b > a * a)) cout<<"Остроугольный"; else cout<<"Тупоугольный"; }
Как я понял, нужно определить, какая буква введена с клавиатуры - большая или маленькая, сделала для английского и русского языка
program one;
var
a:string;
begin
readln(a);
if a[1] in ['a'..'z'] then writeln('Маленькая');
if a[1] in ['A'..'Z'] then writeln('Большая');
if a[1] in ['а'..'я'] then writeln('Маленькая');
if a[1] in ['А'..'Я'] then writeln('Большая');
end.