var a,b,c: real; beginwriteln('введите данные о катетах'); readln(a,b); c: =1/2*a*b; writeln('площадь= ',c: 0: 2); readlnend.
если паскаль абс, то предпоследнюю строку не обязательно.
Ответ дал: Гость
program primer_(число); var (буквы): real или integer; beginwriteln ('введите что-то'); read (буква); буква: =вычисления; write ('значение выражения=', буква); end.
p.s. только смотри на знаки, которые я расставила.
Популярные вопросы