Паскаль. нужно составить программу для нахождения цифр трехзначного числа через запятую. например, при вводе мы пишем 123, а на выходе должно получиться 1, 2, 3
295
314
Ответы на вопрос:
// pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! begin readinteger.tostring.tochararray.println(',') end. пример 123 1,2,3 замечание: число не обязано быть трехзначным.
Program n1; const nn=30000; var m: array [1..nn,1..nn] of integer; i,j,k,n: integer; begin k: =0; writeln('введите n'); readln(n); writeln('введите массив'); for i: =1 to n do for j: =1 to n do begin read(m[i,j]); if (m[i,j] mod 3 =0) then k: =k+1; end; writeln(k); end.
Популярно: Информатика
-
ozzibros08.02.2022 04:29
-
Глеб041724.04.2020 03:11
-
messor0621.01.2020 06:36
-
aminazhum28.01.2020 12:31
-
Confident2319.08.2020 12:59
-
alhanovak219.06.2020 20:51
-
Танюша910209.10.2022 00:01
-
popopoppop201617.02.2020 14:52
-
IDONTNONOTHING28.01.2023 02:41
-
Andreychic2301.04.2023 06:10