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.
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; {находим периметр}
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.
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.