В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
bramekanep0akn0
bramekanep0akn0
24.10.2020 03:15 •  Информатика

С мастера диаграмм постройте следующую фигуру (Excel)


С мастера диаграмм постройте следующую фигуру (Excel)

Показать ответ
Ответ:
nastosetrova2
nastosetrova2
22.10.2020 11:05
1. a; c
2. write(); writeln(). Пример: write(c) /поясняю: ln добавляется для перехода на следующую строку при выводе/
3. Ошибка - в строке "writeln(введите значения переменных m и n);" не указана переменная k. Так же не нужны кавычки в выводе, а при вводе необходимы.
Исправление:
program prim_a;
var m, n, k: integer;

begin
writeln('введите значения переменных m, n и k');
read(m,n, k);
writeln((m+n+k)*5);
end.
4. a) 
program plowad;
var
a, h: real;

begin
writeln('Введите основание треугольника и высоту');
readln(a, h);
writeln('Площадь треугольника равна ', a*h/2);
end.
5. program proizvedenie;
var 
a, b: integer;

begin
writeln('Введите двузначное число');
readln(a);
b:=a mod 10;
a:=a div 10;
writeln('Произведение цифр двузначного числа равно ', a*b);
end.
0,0(0 оценок)
Ответ:
Makaezhik02
Makaezhik02
05.07.2022 15:51
1)
a) не может, потому что переменные должны всегда начинаться с буквы
b) может
c) не может, слова могут быть разделены только знаком "_",не пробелом!
d) может

2) присваивание, обозначается знаком "="
Например:
sum = 0;

3) 
4 строка - не red, а read
пропущена трока между 2 и 3 строчкой - это begin

4)
var
     S, P, a, b: integer
begin
     write('Введите сторону а: ');
     readln(a);
     write('Введите сторону b: ');
     readln(b);
     
     S = a * b; {нахидим площадь}
     P = (a + b) * 2; {находим периметр}

     writeln('Площадь = ', S, ', периметр = ', P);
end.

5)
Var
     number, {Трехзначное число}
     num1, {Первая крайняя цифра}
     num2, {Вотрая крайняя цифра}
     : integer;
Begin
     write('Введите число');
    readln(number);
   
     num1 = number mod 10;
     num2 = number div 100;
    
     writeln('Сумма крайних цифр числа ', number, ' = ', num1 + num2);
End.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота