Предмет: Информатика,
автор: DilyaSheik
Переделайте программу так, чтобы найти сумму s1 и s2
Приложения:
Ответы
Автор ответа:
0
Нужно добавить:
в разделе var - a,b,sum : longint; error : integer;
перед close(td) - val(s1,a,error); val(s2,b,error); sum := a+b; writeln(sum);
*Справка: процедура Val(S, x, kod) преобразует строку символов S в число x. Здесь S – строковое выражение, x – числовая переменная, kod - код ошибки.
в разделе var - a,b,sum : longint; error : integer;
перед close(td) - val(s1,a,error); val(s2,b,error); sum := a+b; writeln(sum);
*Справка: процедура Val(S, x, kod) преобразует строку символов S в число x. Здесь S – строковое выражение, x – числовая переменная, kod - код ошибки.
Автор ответа:
0
Проще никак?
Автор ответа:
0
я не вижу пути проще
Похожие вопросы
Предмет: Математика,
автор: Аноним
Предмет: Физика,
автор: ruslanppakrylov
Предмет: Математика,
автор: neznaika9821
Предмет: Математика,
автор: sasha20031
Предмет: История,
автор: Byka2015