Какая пара клавиш запускает программу, написанную в текстовом редакторе программы интегрированной среды турбо паскаль?
182
219
Ответы на вопрос:
Program №1; uses crt; var st: string; q,i: integer; begin clrscr; writeln('данная программа позволяет вычислить сумму кодов всех букв входящих в заданное слово'); writeln('введите слово ( количество букв в слове не должно превышать 50)'); readln(st); q: =0; for i: =1 to length(st) do q: =q+ord(st[ i ]); writeln(q); readkey; end.
Популярно: Информатика
-
luizalol15.09.2021 11:27
-
vkutepova199902.10.2021 09:33
-
Dzjeihunqasanov02.03.2020 21:30
-
Elinak13218.01.2023 19:54
-
Syrkova106.12.2020 14:48
-
алина389315.02.2020 01:52
-
dzhoxa30.11.2020 20:44
-
Мариночка01040423.02.2023 21:36
-
Лаура220520007.11.2021 00:25
-
Stebnevaalina34602.01.2022 03:03