Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

помогите с порограммой

kevin Ученик (178), на голосовании 13 лет назад
У меня турбо паскаль 7.1
var i,j,k : integer;
begin
i := 2;
j := 3;
k := i + j;
writeln ('Переменная i = ', i);
writeln ('Переменная j = ', j);
writeln ('Переменная k = i + j = ', k);
end.
Ошибок не выдаёт и ничего не происходит
Дополнен 13 лет назад
спасибо и Максиму и Тимуру)) )
Всё получилось!
Голосование за лучший ответ
Максим Ходырев Ученик (156) 13 лет назад
var i,j,k : integer;
begin
i := 2;
j := 3;
k := i + j;
writeln ('Переменная i = ', i);
writeln ('Переменная j = ', j);
writeln ('Переменная k = i + j = ', k);
readln;
end.
Тимур Хафизов Мыслитель (8777) 13 лет назад
программа просто выполняется и тут же закрывается. поэтому надо ставить в конце задержку до нажатия клавиши.
var i,j,k : integer;
begin
i := 2;
j := 3;
k := i + j;
writeln ('Переменная i = ', i);
writeln ('Переменная j = ', j);
writeln ('Переменная k = i + j = ', k);
readln;
end.
Олег Деревенец Гуру (4846) 13 лет назад
Думаю, что это тоже не помешает:
"Песни о Паскале" - программирование для школьников и начинающих.
Скачивается бесплатно.
Песни о Паскале
Похожие вопросы