найдите все оплошности в программке паскаль и исправьте их Var x,y: char;i:integer;begin 

найдите все ошибки в программе паскаль и исправьте их

Var x,y: char;

i:integer;

begin

writeln (введите х);

y:=20;

if x:=5 then y:=y*x;

writeln (y равен,y);

ehd.

Задать свой вопрос
1 ответ
Var
i,y,x:integer;
begin 
writeln (введите x ); 
y:=20; 
if  x:=5 then y:=y*x; 
 writeln (y =' ,y);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт