Известно количество
символов в каждой строке, количество строк на странице. Написать программу,
считывающую эти значения с клавиатуры и вычисляющую число символов на странице.






1

Ответы и объяснения

2013-12-02T20:36:08+04:00
Var a,b,c:integer;
Begin
   Write('Введите кол-во символов в строке'); readln(a);
    Write('Введите кол-во строк'); readln(b);
   c:=a*b;
   Writeln('Кол-во символов на странице: ', c);
end.
Составить программу, запрашивающую при помощи операторов ввода-вывода: название купленного товара, количество и цену (т.е. стоимость одной единицы этого товара). После вычислений и очистки экрана выдать следующие сообщения: название товара и его общая стоимость.
Язык PASCAL
Var a,b,c:real;
блин тут нельзя отступать, щас напишу
Uses crt;
Var a,b:real;
name:string;
Begin
write('Введите название товара: '); readln(name);
write('Введите кол-во товара: '); readln(a);
write('Введите цену товара: '); readln(b);
clrscr;
write(name, 'куплено на сумму: ', a*b);
end.