М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
btsakhaev
btsakhaev
17.01.2021 07:08 •  Информатика

Даны основание и высота равнобедренного треугольника. вычислить площадь и длины боковых сторон этого треугольника . в паскале abc

👇
Ответ:
Olegafrey
Olegafrey
17.01.2021
Var a,b,h,s: real;
begin
write ('Введите длину основания: '); read (b);
write ('Введите длину высоты: '); read (h);
s:=1/2*b*h;
a:=sqrt(sqr(b)/2);
writeln ('Площадь = ',s);
writeln ('Боковые стороны равны = ',a);
end.
4,4(56 оценок)
Открыть все ответы
Ответ:
gregoryan2001
gregoryan2001
17.01.2021
Так как мы не знаем длину числа и нам надо только первые две цифры, то можно поступить так:
1. Переводим число в строку и выделяем две подстроки символ длиной в 1 с начала строки, которые переводим обратно в целое.
2.  А дальше стандартно с целочисленного деления выясняем четность первой цифры числа.
 
var a,a1,a2:integer;
s:string
  begin
  readln(a);
  //преобразуем число в строку и найдем первые 2 цифры
  str(a,s);
  a1:=strtoint(copy(s,1,1));
  a2:=strtoint(copy(s,2,1));
  writeln('Первая цифра числа: ',a1);
  writeln('Вторая цифра числа: ',a2);
  //Проверим первую цифру на четность
  if a1 mod 2 =0 then writeln(a1,' - четная')
    else writeln(a1,' - нечетная')
end.
4,5(56 оценок)
Ответ:
Kissss1111
Kissss1111
17.01.2021
Тема - "Поиск в Интернет?"

1. Чатуранга — древнеиндийская игра, считающаяся прародителем шахмат.Бобби Фишер остался непобежденным чемпионом мира, потому что отказался играть матч.

2. Ученый - Михаил Васильевич Ломоносов.
Диалог:
— «Что, сударь, я полагаю, это ученость выглядывает оттуда?»
— «Нисколько», - ответил Ломоносов. - «Это глупость заглядывает туда.»
(Портрет Ломоносова - в прилагаемом файле).

3. По моде того времени у Моны Лизы выбриты брови. Картина находится в Лувре (Париж, Франция). Адрес web-сайта музея ищите сами (здесь ссылки нельзя размещать).
1.« хх века роуз сказал «это задушевная беседа без слов, лихорадочная активность, триумф и трагедия,
4,4(67 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ