Регистрация
teroserYtube
24.12.2021 21:47
Информатика
Есть ответ 👍

Информатика спс за ранее

167
381
Посмотреть ответы 2

Ответы на вопрос:

yanamalykh
yanamalykh
4,4(100 оценок)

1)-2

2)-3

3)-4

4)-1

Объяснение:

ну как-то так

nik232451
nik232451
4,5(1 оценок)
// pascalabc.net 3.1, сборка 1239 от 08.05.2016 begin   var names: array[1..2,1..5] of string: =       (('саша','женя','таня','лена','вася'),       ('александр','евгений','татьяна','елена','василий'));   var name: =readlnstring('введите краткое имя: ');   var p: =0;   for var i: =1 to 5 do       if name=names[1,i] then begin p: =i; break end;   if p> 0 then writeln(names[2,p])   else writeln('я вас не знаю! ') end. тестовое решение введите краткое имя: лена елена

Популярно: Информатика